Ответы на вопрос:
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.
Популярно: Информатика
-
andrei82203.07.2020 11:26
-
Алисика1115.11.2020 12:52
-
Wolf200204.04.2020 12:18
-
vishnevskayaya01.04.2021 22:13
-
Tegebotik09.06.2023 09:06
-
Настя123123ноно06.05.2021 22:49
-
лилька12308.09.2022 19:12
-
rclpsss12.10.2022 17:23
-
ЖеняРай01.05.2023 12:16
-
runazh02.02.2021 21:02