Составьте программу, по которой компьютер десять раз запросит ввод любых чисел и в результате выведет среднее арифметическое значение введенных чисел (массив не использовать). Сделайте три варианта программы используя операторы цикла While, Repeat и For.

1 ответ

Посмотреть ответы

Megamozg

2205

1) С помощью while:
var

a,b,c,i:integer;

begin

i:=0;

b:=0;

writeln('Write 10 number:');

while i<10 do

begin

read(a);

b:=b+a;

i:=i+1;

end;

writeln('Average: ',b/10:0:0);

readln

end.

Хороший ответ

29 декабря 2022 13:16

Остались вопросы?

Найти нужный

Еще вопросы по категории Информатика

Для чего используется перевод чисел из одной системы счисления в другую?... В таблице приведены запросы и количество страниц, которые нашел поисковый сервер по этим запросам в некотором сегменте Интернета: Запрос Количество с... Емкость USB флешки 256Мбайт. Какова емкость в USB флешки в байтах битах килобайтах информатика 8 кл... Какое число нужно написать вместо многоточия, чтобы цикл выполнился ровно 3 раза? i = 10 while i < = ..:       pri... Сколько символов "звездочка" будет напечатано на экране при выполнении вызова F(7)? def F(n): if n > 1: F(n-2) F(n-1) F(n//2) print('*')...