1)с цикла repeat вывести слово информатика 5 раз 2)с цикла while вывести слово информатика 5 раз
170
182
Ответы на вопрос:
1)
var i: integer;
begin
i: = 0;
repeat
writeln("информатика");
i: =i+1
until i < > 5;
end.
2)
var i: integer;
begin
i: = 0;
while(i < 5) do begin
writeln("информатика");
i : = i+1;
end;
end.
Популярно: Информатика
-
daimon70803.02.2023 01:49
-
lizakocirbenck13.10.2020 15:18
-
Ромашка10050027.06.2021 23:59
-
Komarova2405.11.2020 20:02
-
ibragimgadjizad12.12.2020 03:01
-
чичекадиль07.02.2023 23:24
-
taniamishanina15.08.2020 18:10
-
anninor5313.06.2021 20:30
-
математик21825.12.2021 17:55
-
Чекушка22022.09.2020 14:51