Ответ:
program z;
var i,a:integer;
begin
a:=30;
for i:=1 to 5 do
write(a,' ');
a:=a+a
end
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
program z;
var i,a:integer;
begin
a:=30;
for i:=1 to 5 do
begin
write(a,' ');
a:=a+a
end
end.