Напишите программу, которая в последовательности натуральных чисел определяет минимальное число, кратное 3. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, кратное 3. Количество чисел не превышает 1000. Введённые числа не превыша ют 30 000. Программа должна вывести одно число - минимальное число, кратное 3.

Question

Информатика

Ипат

14 января, 12:10

Напишите программу, которая в последовательности натуральных чисел определяет минимальное число, кратное 3. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, кратное 3. Количество чисел не превышает 1000. Введённые числа не превыша ют 30 000. Программа должна вывести одно число - минимальное число, кратное 3.

+3

Ответы (1)

Знаете ответ на вопрос?

Вацлава · Answer 1

Я не уверен что пройдет все тесты, но лови.

program vichelnenieVK; var o, a, i, b, c:integer; beginb:=30001; c:=0; read (a) ; for i:=1 to a do beginread (o) ; if (o
end.