Написать псевдокод (или блок схему) и код программы для решения следующей задачи: Вычислить среднее арифметическое для чисел, вводимых с клавиатуры. Результат вывести на экран
Ответы
Ответ дал:
0
uses crt;
var a,sum,k:integer;
sr: real;
begin
sum:=0;
k:=0;
writeln('Вводите числа. 0 - конец последовательности');
repeat
readln(a);
sum:=sum+a;
inc(k);
until a=0;
writeln(sum/(k-1));
end.
var a,sum,k:integer;
sr: real;
begin
sum:=0;
k:=0;
writeln('Вводите числа. 0 - конец последовательности');
repeat
readln(a);
sum:=sum+a;
inc(k);
until a=0;
writeln(sum/(k-1));
end.
Приложения:

Похожие вопросы
2 года назад
2 года назад
7 лет назад
7 лет назад
10 лет назад
10 лет назад
10 лет назад
10 лет назад