---

using System;

class Program
{
    static void Main()
    {
        int[] A = { 3, -5, 2, 7, -1, -4, 6, -2, 4, 1 };
        Console.WriteLine("Массив: " + string.Join(", ", A));

        int countPosPos = 0;
        int countDiffSign = 0;
        int countSameSignAbsFirstGreater = 0;

        for (int i = 0; i < A.Length - 1; i++)
        {
            // a) два положительных
            if (A[i] > 0 && A[i + 1] > 0)
                countPosPos++;

            // b) разного знака
            if ((A[i] > 0 && A[i + 1] < 0) || (A[i] < 0 && A[i + 1] > 0))
                countDiffSign++;

            // c) и d) одного знака, |первый| > |второй|
            if ((A[i] > 0 && A[i + 1] > 0 || A[i] < 0 && A[i + 1] < 0) &&
                Math.Abs(A[i]) > Math.Abs(A[i + 1]))
            {
                countSameSignAbsFirstGreater++;
            }
        }

        Console.WriteLine($"a) Двух положительных: {countPosPos}");
        Console.WriteLine($"b) Разного знака: {countDiffSign}");
        Console.WriteLine($"c) и d) Одинаковый знак, |первый| > |второй|: {countSameSignAbsFirstGreater}");
    }
}