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

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

Найти нужный

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

Программа, позволяющая управлять внешним устройством компьютера, называется … системой программирования драйвером браузером операционной системой... На отрезке [0;2] вычислить значения функции f(x) = cosx+x с шагом 0,2. 1. Заполните таблицу по образцу:... файл презентации созданный с помощью программы powerpoint имеет расширение 1) ppt (pptx) 2) txt 3) pas 4) bmp... Какое количество информации в байтах содержит звук глубиной 16 бит с частотой дискретизации 10кГц и длительностью 0,05с?... 1.Какая клавиатура нажимается после набора последнего данного в операторе read? а) Enter б) точка с запятой в) пробел г) Ctrl 2. При присваивании...