Ответы на вопрос:
var z,n:Integer;
begin
z := 5;
for n := 1 to 5 do
z := z*2;
writeln('Z=' + z);
end.
Вывод:
Z = 160
Популярно: Информатика
-
урсвт11.06.2021 13:01
-
konfetabox26.01.2022 02:31
-
TheAgentSquid28.06.2021 02:54
-
elizavety19.04.2020 00:47
-
lok200513.11.2022 02:31
-
abc7123.06.2022 03:45
-
Krasotcakotik07.03.2020 21:23
-
otere15.11.2022 22:51
-
chernov515.09.2022 00:02
-
suminjenya06.09.2022 00:50