Создать программу получения и обработки одномерного массива – вектора: вычислить значение положительных элементов всего массива.

// PascalABC.NET 3.2, сборка 1325 от 19.10.2016
begin
  var n:=ReadInteger('Введите количество элементов:');
  var a:=ReadArrReal('Введите данные:',n).Where(x->x>0).ToArray;
  Writeln('Среднегеометрическое положительных элементов равно ',
    power(a.Where(x->x>0).Aggregate(1.0,(x,y)->x*y),1/a.Length))
end.

Пример
Введите количество элементов: 7
Введите данные: 3.2 -3 4 0 6.1 5 -2
Среднегеометрическое положительных элементов равно 4.44505820618421

Базовые логические выражения: (and = +)
a) not (True) = False
b) not (False) = True
------------------------------------
c) True + True = True
d) True + False = False
e) False + True= False
f) False + False = False
--------------------------------
g) True or True = True
h) True or False = True
i) False or True = True
j) False or False = False
--------------------------------------------
В условии не сказано, кем являются A, B, C
по этому озвучим все 8 вариантов:

1) A = True; B = True; C = True

2) A = True; B = False; C = True

3) A = False; B = True; C = True

4) A = False; B = False; C = True

5) A = True; B = True; C = False

6) A = True; B = False; C = False

7) A = False; B = True; C = False

8) A = False; B = False; C = False

--------------------------------------------
и рассмотрим все 8 вариантов: (T = True; F = False)

1) 



2) 



3) 



4)



5) 



6) 



7) 



8) 

Using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;

namespace ConsoleApplication4
{
    class Program
    {
        static void Main(string[] args)
        {
            bool result = false;
            Console.WriteLine("Введи строку");
            string str = Console.ReadLine();
            for (int i = 0; i < str.Length - 1; i++)
            {
                if (str.Substring(i, 1) == str.Substring(i + 1, 1))
                {
                    result = true;
                    break;
                }
            }

            if (result == true)
                Console.WriteLine("Да, встречаются");
            else
                Console.WriteLine("Нет, не встречаются");

            Console.ReadKey();
        }
    }
}