Найти среднее арифметическое квадратов всех целых чисел от 1 до k (k вводится с клавиатуры) паскаль

Question

Информатика: Найти среднее арифметическое квадратов всех целых чисел от 1 до k (k вводится с клавиатуры) паскаль

dasha20015678 · Answer

vari,k,sum:integer;beginreadln(k);for i:=1 to k do  sum:= sum+sqr(i); write(sum/k:5:2);end....