donliolik
?>

Напишите программу, которая в последовательности натуральных чисел определяет мини¬мальное число, кратное 3. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, кратное 3. Программа должна вывести одно число — минимальное число, кратное 3.

Информатика

Ответы

Eduardovich_Sergei1062

Язык не указан, пишу на 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]
Напишите программу, которая в последовательности натуральных чисел определяет мини¬мальное число, кр

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Напишите программу, которая в последовательности натуральных чисел определяет мини¬мальное число, кратное 3. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, кратное 3. Программа должна вывести одно число — минимальное число, кратное 3.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Vasilevna_Utenkova651
Дарья16
Прошкин_Николай368
vbg238
Zukhra Andreevich1040
minaskorolev8
fermproddk
vikashop269
cat2572066
metegina4
aetolstih
хаджимурод1172
Анатольевич-Лариса
Espivak
inessa12006