Ответ:
1. цикл ПОКА
program z1;
var i:integer;
begin
i:=1;
while i<6 do
writeln ('Здравствуйте! Я робот');
i:=i+1
end
end.
2. цикл ДО
program z2;
repeat
until i=6
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
1. цикл ПОКА
program z1;
var i:integer;
begin
i:=1;
while i<6 do
begin
writeln ('Здравствуйте! Я робот');
i:=i+1
end
end.
2. цикл ДО
program z2;
var i:integer;
begin
i:=1;
repeat
writeln ('Здравствуйте! Я робот');
i:=i+1
until i=6
end.