Склавиатуры вводятся последовательность из n целых чисел сколько чисел кратных числу p

Var  n,p,k,s,i: integer; begin  writeln(n);   readln(n);   writeln(p);   readln(p);   s: =0;   for i: =1 to n do  begin  writeln('введи число');   readln(k);   if (k mod p =0) then s: =s+1;   end;   writeln('ответ ',s);   end.

Не знаю, на каком языке ты я написал на c#   using system; namespace consoleapplication55{    class program    {        static void main(string[] args)        {            link:             console.write("введите кол-во элементов   числовой последовательности: ");             int kol = convert.toint32(console.;             if (kol > 100 || kol < 0)                goto link;             random ran = new random();             int[] array = new int[kol];             console.writeline("\nпоследовательность чисел в строчку: ");             for (int i = 0; i < array.length; i++)            {                array[i] = ran.next(1, 1000);                 console.write(array[i] + " ");             }            console.write("\n\nпоследовательность чисел, где каждое с новой строки: \n");             for (int i = 0; i < array.length; i++)                console.write(array[i] + "\n");             console.readkey();         }    } }смысл такой: ты делаешь массив, размер которого указываешь в начале, потом загружаешь   него рандомные(случайные) числа с периодом от 1 до 1000. после этого выводишь с цикла for элементы с условием, что после каждого элемента будет перевод строки(в с# это "\n"), в паскале это writeln и т.д.

Пуск                                                     программы                                             меню