Перевести код с Паскаля на C# - C# (189748)

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

program lm;
uses crt;
Type
P= array [1..20] of integer;
M= array [1..40] of integer;
Var
a:p;
b:m;
i,k,n,x:integer;
begin
clrscr;
write ('vvedite razmern massiva ');
readln(n);
writeln('vvedite massive  ');
for I:= 1 to N do
readln(A[i]);
K:=0;
for i:=1 to N do
begin
if a[i]<0 then
begin
K:=K+1;
write ('vvedite chislo pered otric cislom ');
read(x);
b[K]:=x;
end;
K:=K+1;
B[k]:=a[i];
end;
write ('Vivod massiva  ');
for i:= 1 to k do
write(B[i],'  ');
readln;
readln;
end.

Решение задачи: «Перевести код с Паскаля на C#»

textual
                            Листинг программы 
                        

                            using System;
 
namespace FromPascal
{
    class Program
    {
        static void Main(string[] args)
        {
            int[] a = new int[20];
            int[] b = new int[40];
 
            Console.Write("Введите размерность массива ");
            int N = Convert.ToInt32(Console.ReadLine());
            Console.WriteLine(N);
            Console.WriteLine("Введите массив (ENTER после каждого числа)");
            for (int i = 0; i < N; i++)
            {
                a[i] = Convert.ToInt32(Console.ReadLine());
                b[i] = 0;
            }
            int k = 0, x;
            for (int i = 0; i < N; i++)
            {
                if (a[i] < 0)
                {
                    k++;
                    Console.Write("Введите число перед отрицательным числом");
                    x = Convert.ToInt32(Console.ReadLine());
                    b[k] = x;
                }
                k++;
                b[k] = a[i];
            }
            Console.Write("Вывод массива ");
            for (int i = 0; i < k; i++)
            {
                Console.Write(b[i] + " ");
            }
            Console.ReadLine();
        }
    }
}
                        