с написанием программ! Вывести 5 целых чисе из экран. (написать преграмму решения с трёз видов шикла на Рacal)

Strangeeo Strangeeo    2   11.09.2020 22:16    0

Ответы
жангул1 жангул1  15.10.2020 20:31

program z1;

var i : integer;

begin

for i:= 1 to 5 do

writeln(i);

end.

program z2;

var i : integer;

begin

i:=0;

while i<5 do

begin

i:=i+1;

writeln(i);

end;

end.

program z3;

var i : integer;

begin

i:=0;

repeat

i:=i+1;

writeln(i);

until i>=5;

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика