Написать программу в паскале которая будет вводить - вопрос №31598380 от AlexLLG 08.07.2021 15:16

Question

Информатика: Написать программу в паскале которая будет вводить целые числа до 0, подсчитать среднее арифметическое этих чисел

AlexLLG · Answer

Var a,n,sum: integer;beginsum:=0;n:=0;readln(a);while a 0 dobeginsum:=sum+a;n:=n+1;end;writeln(sum/n);end....