Перевод из паскале в с# - C#
Формулировка задачи:
program pr1_9;
uses crt;
var
mas: array[1..100] of integer ;
n,i,j,k: integer;
begin
clrscr;
writeln('Bvedite kol elementov posled (ne bolshe 100); ');
read(n);
writeln('Bvedite posledov');
for i:=1 to n do
read(mas[i]);
k:=0;
for j:=1 to 20 do
for i:=1 to n do
if (mas[i]=(2*j*2*j) ) then k:=k+1;
writeln('Kol = ',k);
readln;
readln;
end.Решение задачи: «Перевод из паскале в с#»
textual
Листинг программы
int[] mas = new int[100];
int n, k;
Console.Clear();
Console.WriteLine("Bvedite kol elementov posled (ne bolshe 100);");
n = int.Parse(Console.ReadLine());
Console.WriteLine("Bvedite posledov");
for (int i = 0; i < n; ++i)
mas[0] = int.Parse(Console.ReadLine());
k = 0;
for (int j = 1; j <= 20; ++j) {
for (int i = 0; i < n; ++i) {
if (mas[i] == 2 * j * 2 * j)
k++;
}
}
Console.WriteLine("Kol = " + k);
Console.ReadLine();