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

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

var i,s:integer;

begin

  for i:= 10 to 15 do

    s:=s+ i*i;

  write(s);

end.

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку