Есть ответ 👍

Составить программу ,которая будет выдавать последовательность квадратов натуральных чисел от 1 до n, где n вводится с экрана.заранее

160
349
Посмотреть ответы 3

Ответы на вопрос:

Skipihc
4,4(35 оценок)

Pascalabc.net 3.3.5, сборка 1640 от 17.03.2018 внимание! если программа не работает, обновите версию! begin   1.to(readinteger('n='(t-> t*t).println end. пример n= 30 1 4 9 16 25 36 49 64 81 100 121 144 169 196 225 256 289 324 361 400 441 484 529 576 625 676 729 784 841 900
pidortema
4,6(36 оценок)

Var x,n: integer; begin write('n = '); readln(n);       x : = 1; while sqr(x) < n do begin write(sqr(x),' ');           x : = x + 1 end;   readln end.
khursin03
4,7(71 оценок)

Ноль, потому что i не больше единицы еще до начала работы цикла.

Популярно: Информатика