Программа получает на вход целые числа, количество введенных чисел
Условие
Напишите программу, которая в последовательности натуральных чисел определяет наименьшее число, кратное 3. Программа получает на вход целые числа, количество введенных чисел неизвестно, последовательность чисел заканчивается числом 0 (0 — признак окончания ввода, не является членом последовательности)Количество чисел не превышает 1000. Введенные числа не превышают 30 000. Гарантируется, что в последовательности есть хотя бы одно число, кратное 3.Программа должна вывести одно число: наименьшее число, кратное 3.Пример работы программы:Входные данные | Выходные данные | 45 10 9 0 | 9 | Критерии оценивания выполнения задания | Баллы | Предложено верное решение. Программа правильно работает на всех приведённых выше тестах. Программа может быть записана на любом языке программирования | 2 | Программа выдаёт неверный ответ на одном из тестов, приведённых выше | 1 | Программа выдаёт на тестах неверные ответы, отличные от описанных в критерии на 1 балл | 0 | Максимальный балл | 2 |
Формат задания
Решение по шагам
Как рассуждать
Решение. Запишем требуемое решение.var min_num: integer; num: integer; begin min_num := 30001; while true do begin readln(num); if num = 0 then break; if (num mod 3 =
Осталось ещё 1 шаг — откроются после входа:
- Шаг 2
Бесплатно · займёт минуту