Написать программу вычисляющую среднее арифметическое - вопрос №25524250 от nastyaturchina 22.06.2022 05:21

Question

Информатика: Написать программу вычисляющую среднее арифметическое целых чисел от 0 до 100.

nastyaturchina · Answer

Var i,k:integer;s:real;beginfor i:=0 to 100 do begins:=s+i;k:=k+1;end;s:=s/k;writeln (s:5:2);end....