Найти среднее арифметическое квадратов всех целых чисел от единицы до ста

Question

Найти среднее арифметическое квадратов всех целых чисел от единицы до ста

Answer 1

Begin 
   writeln ((1 + 100)/2); // сумма арифметической прогрессии / 100
end.