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

Программа получает на вход N, почле чего в цикле постепенно обрабатывает все натуральные числа от 1 до N включительно и в ячейку памяти s откладывает их квадраты.   program summa; uses crt; var N,a,s,i: integer; begin read(N); a:=0; s:=0; for i:=1 to N do begin a:=a+1; s:=s+(a*a); end; writeln(s); end.