Question

Напишите фрагмент программы, находящий сумму
квадратов чисел от 1 до 100. (Паскаль)

Answer 1

Если фрагмент, тогда

s:=0;
for i:=1 to 100 do
s:=s+i*i;

Answer 2

а если по подробнее

Answer 3

Просили же фрагмент. Сейчас выложу полностью.

Answer 4

А нет, не выложу. Отмечен как нарушение - изменить не могу.

Answer 5

ну окей

Answer 6

всё равно спасибо