Question

Пользователь с клавиатуры вводит натуральное число N. Программа должна посчитать
квадраты всех натуральных чисел от 1 до введенного числа N включительно.
с использованием цикла FOR.
программа в Паскале. ​

Answer 1

Ответ:

Код ниже

Объяснение:

program showSquared;

var N, i: integer;

begin

   writeln('Введите число N');

   readln(N);

   for i := 1 to N do begin

      writeln('Квадрат числа ', i, ' равен ', sqr(i));

   end;

end.