Cоставьте программу , которая находит сумму квадратов чисел от 5 до 20:...

0 голосов
45 просмотров

Cоставьте программу , которая находит сумму квадратов чисел от 5 до 20: 52+62+72+82+...+202


Информатика (16 баллов) | 45 просмотров
Дан 1 ответ
0 голосов

Если ЭТО "52+62+72+82+...+202" означает "5^2+6^2+7^2+8^2+...+20^2", то
var
a,i:integer;
Begin
for i:=5 to 20 do
a:=a+i*i;
Writeln(a)
End.

(875 баллов)