Перевести программу из pascal в с# - C#

Формулировка задачи:

помогите пожалуйста перевести программу из pascal в с#

                    Листинг программы
                
 
                        
                          
                    
uses crt;
const nmax=100;
var a:array[1..nmax] of integer;
n,i,k:integer;
begin
clrscr;
randomize;
repeat
write('Размер массива до ',nmax,' n=');
readln(n);
until n in [1..nmax];
writeln('Исходный массив:');
for i:=1 to n do
 begin
  a[i]:=random(50)-25;
  write(a[i]:4);
 end;
writeln;
{просто посчитаем количество перегибов+1}
k:=1;
for i:=2 to n-1 do
if((a[i]<a[i-1])and(a[i]<a[i+1]))or((a[i]>a[i-1])and(a[i]>a[i+1]))
then k:=k+1;
write('Количество участков монотонности=',k);
readln
end.

Решение задачи: «Перевести программу из pascal в с#»

textual
                            Листинг программы 
                        
 
                        
                          
                    
static void Main(string[] args)
        {
            int nmax = 100;
            Console.Write("INput range of array (N < {0}) N = ", nmax);
            int N = int.Parse(Console.ReadLine());
            Random random = new Random();
            int[] massiv = new int[N];
            for (int i = 0; i < massiv.Length; i++)
            {
                massiv[i] = random.Next(0, 50);
                Console.WriteLine(" " + massiv[i]);
            }
            int count = 1;
            for (int i = 1; i < massiv.Length - 1; i++)
            {
                if(((massiv[i]) < massiv[i-1] && (massiv[i] < massiv[i+1])) || ((massiv[i]) > massiv[i-1] && (massiv[i] > massiv[i+1])));
                count++;
            }
            Console.WriteLine("Result = {0}",count);
        }