Решите в программе паскаль Напишите программу, которая вычисляет сумму квадратов первых...

Question

Решите в программе паскаль Напишите программу, которая вычисляет сумму квадратов первых n натуральных чисел

Answer 1

Ответ:

var i,n,s: integer;

begin

s:=0;

write('Введите n: ');

readln(n);

for i:=1 to n do

s:=s+i*i;

writeln('Сумма квадратов первых ',n,

' натуральных чисел: ',s);

end.