Одномерный массив: последовательность элементов

[AntonMike]

Мужики, всем доброго времени суток!
У нас только началось программирование, учусь заочно. Дали задание:

Дан одномерный массив A из N элементов. Выяснить, составляют ли элементы заданного массива строго возрастающую последовательность или строго убывающую последовательность, либо эта последовательность не является строго монотонной.

Нашёл пример решения этой задачи на Delphi. Не могли бы Вы помочь с её переводом на C#?

var
n,n11,n12,n21,n22:integer;
mas:array of integer;
i: integer;
begin
   readln (n);
   for i:=1 to n do readln (mas[i]);
 
   n11:=0;
   n12:=0;
   n21:=0;
   n22:=0; 
   for i:=1 to n-1 do
      if mas[i]>mas[i+1] then inc(n11);
      if mas[i]<mas[i+1] then inc(n12);
      if mas[i]>=mas[i+1] then inc(n21);
      if mas[i]<=mas[i+1] then inc(n22);
   begin
 
   if n11=n then writeln('Strogo monotonaya - Vozrastaushaya')
     else if n12=n then writeln('Strogo monotonaya - Ubivayushaya')
        else if n21=n then writeln(' Monotonaya - NeUbivayushaya')
          else  if n22=n then writeln(' Monotonaya - NeVozrastaushaya')
            else Writeln('Ne Monotonnaya');
   
   readln;
   end;
end.

[Serge_Bliznykov]

ну давайте начнём с того, что представленное решение в Delphi не верное (не рабочее)!
во-первых, некорректная работа с динамическим массивом.
во-вторых, begin .. end стоят не на своих местах, (в цикле будет выполнятьс только первый if )
ну и в-третьих, никогда переменные n11.. n22 не будут равны n !

[AntonMike]

Сообщение от Serge_Bliznykov

ну давайте начнём с того, что представленное решение в Delphi не верное (не рабочее)!
во-первых, некорректная работа с динамическим массивом.
во-вторых, begin .. end стоят не на своих местах, (в цикле будет выполнятьс только первый if )
ну и в-третьих, никогда переменные n11.. n22 не будут равны n !

Спасибо за помощь, только я поэтому и написал, что не знаю.

[Serge_Bliznykov]

Спасибо за помощь, только я поэтому и написал, что не знаю.

погодите благодарить то..
я не понял, чего Вы не знаете? Как решается ваша задача?
Или вообще ничего не знаете?!

[AntonMike]

Сообщение от Serge_Bliznykov

погодите благодарить то..
я не понял, чего Вы не знаете? Как решается ваша задача?
Или вообще ничего не знаете?!

Сергей, не знаю как на СиШарп код написать. Условия сами.
Только начал работать в нём, вообще раньше с программированием не сталкивался.
Тренируюсь пока на простых массивах, но толку мало похоже...

[Serge_Bliznykov]

ладно. код простой. в порядке исключения переложил я вашу дельфийскую программу на C#:

        static void Main(string[] args)
        {
            Console.Write("введите n: ");
            int n = Convert.ToInt32(Console.ReadLine());
            int[] mas = new int[n];
            for (int i = 0; i < n; i++)
            {
                Console.Write("введите mas[{0}] : ",i+1);
                mas[i] = Convert.ToInt32(Console.ReadLine());
            }

            int n11=0, n12=0, n21=0, n22=0;
            for (int i = 0; i < n-1; i++)
            {
               if (mas[i]>mas[i+1]) n11++;
               if (mas[i]<mas[i+1]) n12++;
               if (mas[i]>=mas[i+1]) n21++;
               if (mas[i]<=mas[i+1]) n22++;
            }

            Console.WriteLine(" n11 = {0}  n12 = {1}  n21 = {2}  n22= {3} \n\n", n11, n12, n21, n22);

            if (n11 == (n - 1))
            {
                Console.WriteLine("Strogo monotonaya - Ubivayushaya");
            }
            else
            {
                if (n12 == (n - 1))
                {
                    Console.WriteLine("Strogo monotonaya - Vozrastaushaya");
                }
                else
                {
                    if (n21 == (n - 1))
                    {
                        Console.WriteLine("NE Strogo monotonaya - Ubivayushaya");
                    }
                    else
                    {
                        if (n22 == (n - 1))
                        {
                            Console.WriteLine("NE Strogo monotonaya - Vozrastaushaya");
                        }
                        else
                        {
                            Console.WriteLine("NE monotonnay!");
                        }
                    }
                }
            }


            Console.WriteLine("\nPress any key to exit");
            Console.ReadKey();

        }

[AntonMike]

Сообщение от Serge_Bliznykov

ладно. код простой. в порядке исключения переложил я вашу дельфийскую программу на C#:

        static void Main(string[] args)
        {
            Console.Write("введите n: ");
            int n = Convert.ToInt32(Console.ReadLine());
            int[] mas = new int[n];
            for (int i = 0; i < n; i++)
            {
                Console.Write("введите mas[{0}] : ",i+1);
                mas[i] = Convert.ToInt32(Console.ReadLine());
            }

            int n11=0, n12=0, n21=0, n22=0;
            for (int i = 0; i < n-1; i++)
            {
               if (mas[i]>mas[i+1]) n11++;
               if (mas[i]<mas[i+1]) n12++;
               if (mas[i]>=mas[i+1]) n21++;
               if (mas[i]<=mas[i+1]) n22++;
            }

            Console.WriteLine(" n11 = {0}  n12 = {1}  n21 = {2}  n22= {3} \n\n", n11, n12, n21, n22);

            if (n11 == (n - 1))
            {
                Console.WriteLine("Strogo monotonaya - Ubivayushaya");
            }
            else
            {
                if (n12 == (n - 1))
                {
                    Console.WriteLine("Strogo monotonaya - Vozrastaushaya");
                }
                else
                {
                    if (n21 == (n - 1))
                    {
                        Console.WriteLine("NE Strogo monotonaya - Ubivayushaya");
                    }
                    else
                    {
                        if (n22 == (n - 1))
                        {
                            Console.WriteLine("NE Strogo monotonaya - Vozrastaushaya");
                        }
                        else
                        {
                            Console.WriteLine("NE monotonnay!");
                        }
                    }
                }
            }


            Console.WriteLine("\nPress any key to exit");
            Console.ReadKey();

        }

Спасибо большое, Сергей! Очень выручили меня. Нам дали 5 заданий. 4 я сделал, а на этом остановился.
Извините, что заставил потратить время, ещё раз спасибо! Буду разбираться теперь...