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

Question

Другие предметы: Найти среднее арифметическое квадратов всех целых чисел от 1 до 100 (программа Паскаль)

bannikovegor · Answer

program z1; uses crt; var i:integer;s:real; begin for i:= 1 to 100 do s:=s+sqr(i); s:=s/100; writeln (s); end....