Напишите программу, которая в последовательности натуральных чисел определяет количество всех четных чисел, кратных 9. Программа получает на вход натуральные числа, количество введенных чисел неизвестно, последовательность чисел заканчивается числом 0 (0 — признак окончания ввода, не входит в последовательность). Количество чисел не превышает 1000. Введенные числа не превышают 30 000. Программа должна вывести одно число: количество всех четных чисел, кратных 9.
Пример работы программы:
Входные данные
Выходные данные
27241822360
2
Решение.
var a, s: integer; begin s:= 0; readln(a); while a<>0 do begin if (a mod 2 = 0) and (a mod 9 = 0) then s : = s + 1 ; readln(a); end; writeln(s) end.
Приведем решение на языке Python.
kol = 0 a = int(input()) while a != 0: if (a % 2 == 0) and (a % 9 == 0): kol += 1 a = int(input()) print(kol)
Для проверки правильности работы программы необходимо использовать следующие тесты:
Входные данные
Выходные данные
1
10
54
27
36
0
2
2
47
0
0
3
18
0
1
Просмотр содержимого документа
«Разбор задания ОГЭ по информатике. Февраль 2025. Программирование. Каталог заданий. Задания для подготовки»
Тип 16 № 37859
Напишите программу, которая в последовательности натуральных чисел определяет количество всех четных чисел, кратных 9. Программа получает на вход натуральные числа, количество введенных чисел неизвестно, последовательность чисел заканчивается числом 0 (0 — признак окончания ввода, не входит в последовательность). Количество чисел не превышает 1000. Введенные числа не превышают 30 000. Программа должна вывести одно число: количество всех четных чисел, кратных 9.
Пример работы программы:
Входные данные
Выходные данные
27241822360
2
Решение.
var a, s: integer; begin s:= 0; readln(a); while a0 do begin if (a mod 2 = 0) and (a mod 9 = 0) then s : = s + 1 ; readln(a); end; writeln(s) end.
Приведем решение на языке Python.
kol = 0 a = int(input()) while a != 0: if (a % 2 == 0) and (a % 9 == 0): kol += 1 a = int(input()) print(kol)
Для проверки правильности работы программы необходимо использовать следующие тесты: