Лучшие помощники
- Megamozg 2200 б
- Matalya1 1800 б
- DevAdmin 1700 б
- arkasha_bortnikov 890 б
- Dwayne_Johnson 860 б
27 декабря 2022 13:16
497
Составьте программу, по которой компьютер десять раз запросит ввод любых чисел и в результате выведет среднее арифметическое значение введенных чисел (массив не использовать). Сделайте три варианта программы используя операторы цикла While, Repeat и For.
1
ответ
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.
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.
0
·
Хороший ответ
29 декабря 2022 13:16
Остались вопросы?
Еще вопросы по категории Информатика
Как записывается число 754 8 в шестнадцатеричной системе счисления?...
Выберите знаковые информационные модели: 1.Формула площади прямоугольника 2.Басня 3.Иллюстрация 4.Рисунок 5.Географическая карта...
2. Рассчитайте объём памяти, необходимой для представления одноминутного фильма на экране монитора с пространственным разрешением 800 х 600 пикселей и...
Определите типы исполнителей в предложенных ситуациях. Будьте готовы обосновать свой ответ. а)Симфонический оркестр исполняет музыкальное произведение...
Пж ПОМОГИТЕ 1 ВОПРОС Что входит в состав прикладного программного обеспечения?...
Все предметы