Как переписать данную программу с паскаля на C#?

@Pascal2015 · Регистрация: 28.11.2015

Author24 — интернет-сервис помощи студентам

Pascal

var
n,i,cislo:integer;
s:boolean;
p:array [1..1000] of array [1..1000] of integer;
 
begin
for i:=1 to 1000 do
 
begin
p[i,2]:=1000;
end;
p[1,1]:=2;
p[2,1]:=3;
p[3,1]:=5;
p[4,1]:=7;
p[5,1]:=11;
p[6,1]:=13;
p[7,1]:=17;
p[8,1]:=19;
p[9,1]:=23;
p[10,1]:=29;
p[11,1]:=31;
p[12,1]:=37;
p[13,1]:=41;
p[14,1]:=43;
p[15,1]:=47;
p[16,1]:=53;
p[17,1]:=59;
 
readln(n);
for i:=1 to n do
begin
read(p[i,1000]);
end;
cislo:=0;
repeat
for i:=1 to n do
begin
if p[i,10]<100 then
begin
if cislo mod p[i,1] = p[i,1000] then s:=true else
begin
s:=false;
break
end;
 
end;
end;
cislo:=cislo+1;
until s = true;
writeln(cislo-1);
end.

@агерон · 07.03.2016, 09:31

никак

, пишите программу на C# с 0

@агерон 447 / 300 / 65 Регистрация: 12.10.2009 Сообщений: 1,162
	07.03.2016, 09:31	2
	никак , пишите программу на C# с 0 0

Опции темы