Составьте программу, по которой компьютер десять раз запросит ввод любых чисел и в результате выведет среднее арифметическое значение введенных чисел (массив не использовать). Сделайте три варианта программы используя операторы цикла 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

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

Найти нужный

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

Найдите в сети Интернет анимация шагов алгоритма эратосфена с помощью алгоритма эратосфена Найдите все простые числа не превышающие 50... Выбери верные ответы. Достоинства растровой графики: Масштабирование (в частности, увеличения) изображения с потерей качества. Неточная передача цве... Что такое байт, килобайт, мегабайт и гигабайт? Как они связаны между собой? Сколько байтов составляют 1/2 килобайта? Сколько битов содержится в 1/2... Установить соответствие 1) Выравнивание абзаца 2) Интервал между символами 3) Отступы 4) Межстрочный интервал A) расположение текста абзаца от... Длина Московской кольцевой автомобильной дороги —109 километров. Байкер Вася стартует с нулевого километра МКАД и едет со скоростью vкилометров в час....