Регистрация
dashasokolova21
30.04.2021 08:33
Информатика
Есть ответ 👍

с задачей в паскале с решением задачи для паскаля : "Напишите программу, которая в последовательности натуральных чисел находит среднее арифметическое числе, кратных 8, или сообщает, что таких чисел нет (выводит "NO"). Программа получает на вход натуральные числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 - признак окончания ввода, не входит в последовательность). Количество чисел не превышает 300. Программа должна вывести среднее арифметическое чисел, кратных 8, или вывести "NO", если таких чисел нет. Значение выводить с точностью до десятых. Пример работы программы : входные данные - 8, 122, 64, 16, 0, выходные данные - 29,3; Входные данные - 111, 1, 0, выходные данные - NO.

186
320
Посмотреть ответы 1

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

Неизвестныйлунтик
Неизвестныйлунтик
4,4(16 оценок)

ответ:min:=0;

for i:=1 to n do

readln(x);

if (min = 0) and (x mod 3 = 0) then

min:=x

else if (x < min) and (x mod 3 = 0) then

min:=x;

Объяснение:

Популярно: Информатика