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

Question

Информатика

Анна

28 января, 09:40

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

+2

Ответы (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.