Напишите программу которая в последовательности натуральных чисел находит среднее арифметическое
Тип 15 № 4972 
Напишите программу, которая в последовательности натуральных чисел находит среднее арифметическое двузначных чисел или сообщает, что таких чисел нет (выводит « NO ») . Программа получает на вход натуральные числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 − признак окончания ввода, не входит в последовательность).
Количество чисел не превышает 100. Введенные числа не превышают 300.
Программа должна вывести среднее арифметическое двузначных чисел или вывести « NO », если таких чисел нет . Значение выводить с точностью до десятых.
Это задание ещё не решено, приводим решение прототипа.
Напишите программу, которая в последовательности натуральных чисел находит среднее арифметическое чисел, кратных 8, или сообщает, что таких чисел нет (выводит « NO ») . Программа получает на вход натуральные числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 — признак окончания ввода, не входит в последовательность). Количество чисел не превышает 100. Введённые числа не превышают 300. Программа должна вывести среднее арифметическое чисел, кратных 8, или вывести « NO », если таких чисел нет . Значение выводить с точностью до десятых.
Пример работы программы:
20.2 Решением является программа, записанная на любом языке программирования. Пример верного решения, записанного на языке Паскаль:
Задание №20.2 ОГЭ.Запись алгоритма на языке программирования
Второй вариант задания №20 ОГЭ по информатике и ИКТ, относящегося к высокому уровню сложности, предусматривает разработку и запись алгоритма на языке программирования.
Рассмотрим типовые задания тренировочных работ и разберем способы их решения.
Задание №20.2. Напишите программу, которая в последовательности натуральных чисел находит среднее арифметическое двухзначных чисел или сообщает, что таких чисел нет.
Программа получает на вход натуральные числа, количество введенных чисел неизвестно, последовательность заканчивается числом 0 (0 – признак окончания ввода, не является членом последовательности).
Количество чисел не превышает 100 . Введенные числа не превышают 300 . Программа должна вывести среднее арифметическое двухзначных чисел или вывести NO , если таких чисел в последовательности нет.
1. Два предложения в последнем абзаце «Количество чисел не превышает 100. Введенные числа не превышают 300» указывают на два факта:
- максимальное возможное количество двухзначных чисел в последовательности не превышает 100 ;
- максимальная возможная сумма двухзначных чисел в последовательности не превышает 9900 .
Т. к. числа в последовательности натуральные, то с учетом выше перечисленных замечаний выберем для переменных тип данных integer .
Для решения поставленной задачи определим количество чисел в последовательности, удовлетворяющих условию двузначности, и найдем их сумму. Количество будем накапливать в переменной count , а сумму — в переменной s . Текущий член последовательности, вводимый с клавиатуры, будем хранить в переменной num .
Поскольку «количество введенных чисел неизвестно», то в программе будем использовать цикл с предусловием while , работа которого прекращается, если введенный член последовательности будет равен 0 .
Вывод результатов работы программы осуществим с помощью условного оператора if .
- var
- s, num, count: integer;
- begin
- s := 0;
- readln(num);
- count := 1;
- while (num <> 0) do
- begin
- if (n > 9) and (n
В последовательности натуральных чисел найти среднее арифметическое трёхзначных — Free Pascal
Напишите программу, которая в последовательности натуральных чисел находит среднее арифметическое трёхзначных чисел или сообщает, что таких чисел нет (выводит NO). Программа получает на вход натуральные числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность). Программа должна вывести среднее арифметическое трёхзначных чисел или вывести NO, если таких чисел нет.
Пример работы программы: 10 125 120 =122.5 0 11 1 =NO 0
Подсказка: задача решается с применением цикла с предусловием, неоднократным вводом чисел с клавиатуры и включает в себя условный оператор.