Решение:
var z,n:Integer;
begin
z := 5;
for n := 1 to 5 do
z := z*2;
writeln('Z=' + z);
end.
Вывод:
Z = 160
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Решение:
var z,n:Integer;
begin
z := 5;
for n := 1 to 5 do
z := z*2;
writeln('Z=' + z);
end.
Вывод:
Z = 160