Предмет: Информатика,
автор: nooobodyyy
Написать программу, которая вычисляет среднее арифметическое вводимой с клавиатуры последовательности дробных чисел. Количество чисел должно задаваться во время работы программы. (цикл для)(паскаль )
Ответы
Автор ответа:
0
var
i, count : integer;
summ, temp : real;
begin
summ := 0;
readln(count);
for i := 1 to count do
begin
readln(temp);
summ := summ + temp;
end;
writeln(summ / count);
end.
i, count : integer;
summ, temp : real;
begin
summ := 0;
readln(count);
for i := 1 to count do
begin
readln(temp);
summ := summ + temp;
end;
writeln(summ / count);
end.
Похожие вопросы
Предмет: Українська мова,
автор: golovcenkoandrusa683
Предмет: Қазақ тiлi,
автор: merybekdada
Предмет: Другие предметы,
автор: sorryimgumunitarii
Предмет: География,
автор: tatyana0211
Предмет: Литература,
автор: 572049