Ответ:
Объяснение:
var
a,n,i:integer;
begin
read(n);
for i:=1 to n do
a:=sqr(i);
write(a,' ');
end;
end.
end
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
Объяснение:
var
a,n,i:integer;
begin
read(n);
for i:=1 to n do
begin
a:=sqr(i);
write(a,' ');
end;
end.
Ответ:
Объяснение:
var
a,n,i:integer;
begin
read(n);
for i:=1 to n do
begin
a:=sqr(i);
write(a,' ');
end;
end