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

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

Найти нужный

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

Лабораторная работа № 12 Создание запросов 1. Закладка Запросы/Создать/Конструктор. 2. В окне Добавление таблиц добавить обе та... Какие устройства ввода и вывода знаете?... Выполните вычитание двоичных чисел 1. 11010-1101= 6. 10111-1001= 2. 1101-110= 7. 111011-11001= 3. 1101-111= 8. 110111-11100= 4. 10001-1011= 9. 1111... Зная,что в кодировке ASCII десятичный код каждой строчной латинской буквы на 32больше кода соответствующий прописной буквы ,декотируйте следующие сооб... Для числа 1001 определите значение логического выражения (в ответе запишите 0 или 1): не (число четное) или не (число кратно 3)....