найти сумму квадратов всех целых чисел от 10 до 15.

СРОЧНО.ПЛИИИИИИИИИИИЗ!!!!!!!!!!!!!

Ответы

Ответ дал: archery
0

var i,s:integer;

begin

  for i:= 10 to 15 do

    s:=s+ i*i;

  write(s);

end.

Похожие вопросы