
А. Среднее арифметическое 1) Напишите программу, которая в последовательности натуральных чисел
находит среднее арифметическое трѐхзначных чисел или сообщает, что таких чисел нет (выводит NO). Программа получает на вход натуральные числа, количество введѐнных чисел неизвестно, последовательность чисел заканчивается числом 0 (0 признак окончания ввода, не входит в последовательность). Количество чисел не превышает 20. Введѐнные числа не превышают 1500. Программа должна вывести среднее арифметическое трѐхзначных чисел или вывести «NO», если таких чисел нет. Пример работы программы: Входные данные Выходные данные 10 120 125 0 122.5 11 1 0 NO

Ответы на вопрос

Ответ:
program arithmeticmean;
var
i, quantity: integer;
amount: longint;
begin
quantity := 0;
amount := 0;
i := 1;
while i <> 0 do
begin
read(i);
if (i > 99) and (i < 1000) then
begin
amount := amount + i;
quantity := quantity + 1;
end
end;
if (quantity <> 0) then
write(amount / quantity)
else
write('NO');
end.
Объяснение:
program arithmeticmean; // Название программы
var
i, quantity: integer; // Создание целочисленных переменных
- i - вводимые с клавиатуры числа;
- quantity - количество трехзначных чисел.
amount: longint; // Создание целочисленной переменной
- amount - сумма трехзначных чисел
begin // Начало программы
quantity := 0; // Количество трехзначных чисел = 0
amount := 0; // Сумма трехзначных чисел = 0
i := 1; // Переменная i = 1 (делается это для того, чтобы зайти в цикл (выходит какого-то рода обман))
while i <> 0 do // Пока переменная i ≠ 0
begin // Начало цикла
read(i); // Считываем с клавиатуры значение переменной i
if (i > 99) and (i < 1000) then // Если (*значение переменной i* > 99) И (*значение переменной i* < 1000), тогда - проверка, является ли число трехзначным
begin // Начало блока
amount := amount + i; // К переменной, хранящей сумму, прибавляется значение переменной i
quantity := quantity + 1; // К переменной, хранящей количество, прибавляется значение 1
end // Конец блока
end; // Конец цикла
if (quantity <> 0) then // Если количество трехзначных чисел ≠ 0, тогда - проверка, есть ли трехзначные числа в последовательности
write(amount / quantity) // Выводим среднее арифметическое - сумма ÷ количество
else // Иначе
write('NO'); // Выводим NO
end. // Конец программы



Задача:
Напишите программу, которая в последовательности натуральных чисел находит среднее арифметическое трехзначных чисел или сообщает, что таких чисел нет (выводит "NO"). Программа получает на вход натуральные числа, количество введенных чисел неизвестно, последовательность чисел заканчивается числом 0 (0 признак окончания ввода, не входит в последовательность). Количество чисел не превышает 20. Введенные числа не превышают 1500. Программа должна вывести среднее арифметическое трехзначных чисел или вывести "NO", если таких чисел нет.
Решение:
Для решения данной задачи, мы можем использовать следующий алгоритм:
1. Инициализируем переменные `sum` и `count` со значением 0. 2. Начинаем цикл, который будет выполняться до тех пор, пока пользователь не введет число 0 или пока не будет достигнуто максимальное количество чисел. 3. Внутри цикла, проверяем, является ли введенное число трехзначным. 4. Если число трехзначное, то добавляем его к переменной `sum` и увеличиваем значение переменной `count` на 1. 5. После окончания цикла, проверяем значение переменной `count`. 6. Если `count` равно 0, то выводим "NO", так как трехзначных чисел не было введено. 7. Если `count` больше 0, то вычисляем среднее арифметическое трехзначных чисел, разделив сумму на количество чисел. 8. Выводим полученное среднее арифметическое.
Пример работы программы: ``` Входные данные: 10 120 125 0 Выходные данные: 122.5
Входные данные: 11 1 0 Выходные данные: NO ```
Пример кода на языке Python:
```python def find_average(): sum = 0 count = 0
while True: num = int(input("Введите число: ")) if num == 0 or count == 20: break
if 100 <= num <= 999: sum += num count += 1
if count == 0: print("NO") else: average = sum / count print("Среднее арифметическое трехзначных чисел:", average)
find_average() ```
Пожалуйста, обратите внимание, что код написан на языке Python. Вы можете скопировать его и запустить на своем компьютере для проверки.


Похожие вопросы
Топ вопросов за вчера в категории Информатика
Последние заданные вопросы в категории Информатика
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili