Question

Составте программу нахождения суммы квадратов первых семи натуральных чисел
СРОЧНО!!

Answer 1

Ответ:

var

s:longint;

i:byte;

begin

  s:=1;

 for i:=2 to 7 do

   s:=s+i*i;

 writeln(s);

end.

Объяснение: