Номер два. Решите пожалуйста. Язык Паскаль.
Если решите то помогите с номером 1, он у меня в профиле.
Приложения:
Ответы
Ответ дал:
1
Ответ:
готово
Объяснение:
var i,n:integer;
begin
write('n=');readln(n);
i:=1;
while i<=n do begin
write(sqr(i), ', ');
i:=i+1;
end;
end.
Danyalox123:
Благодарю
Вас заинтересует
2 месяца назад
2 месяца назад
3 месяца назад
3 месяца назад
1 год назад
7 лет назад