Номер два. Решите пожалуйста. Язык Паскаль.
Если решите то помогите с номером 1, он у меня в профиле.
Если решите то помогите с номером 1, он у меня в профиле.
More Questions From This User See All
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
готово
Объяснение:
var i,n:integer;
begin
write('n=');readln(n);
i:=1;
while i<=n do begin
write(sqr(i), ', ');
i:=i+1;
end;
end.