Напишите фрагмент программы, находящий сумму
квадратов чисел от 1 до 100. (Паскаль)
Если фрагмент, тогда
s:=0;
for i:=1 to 100 do
s:=s+i*i;
Оцени ответ
