Составьте программу, по которой компьютер десять раз запросит ввод любых чисел и в результате выведет среднее арифметическое значение введенных чисел (массив не использовать). Сделайте три варианта программы используя операторы цикла 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) «Мик и Рорти, S2E04», размер... СРОЧНОО ПОЖАЛУЙСТА!!!ДАЮ 20 БАЛЛОВ !!!!!! Дано действительное число А. Если А - положительное число , то возведите его в квадрат , если же число А - о... Пользователь компьютера, хорошо владеющий навыками ввода информации с клавиатуры, может вводить в минуту 100 знаков. Мощность алфавита, используемого... для ввода в оперативную память значений переменных используется оператор 1.read 2.listen 3.if 4.var помогите пожалуйста...