Напишите программу, которая в последовательности натуральных чисел определяет мини¬мальное число, кратное 3. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, кратное 3. Программа должна вывести одно число — минимальное число, кратное 3.
Ответы
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Микроволновые системы что это
Автор: Дмитрий_Владимирович1162
Напишите программу которая из 3-ех значного числа находит * цифр
Автор: turovvlad
Язык не указан, пишу на Haskell.
main :: IO ()main = a >>= b >>= c where a = (read <$> getLine) :: IO Int b n = (read <$>) <$> mapM (const getLine) [1..n] :: IO [Int] c = print . minFor3 minFor3 xs = minimum [x | x <- xs, x `mod` 3 == 0]