Предмет: Информатика,
автор: pecurkinmaksim79
Помогите пожалуйста
1. Составить программу, находящую сумму всех трёхзначных чисел, оканчивающихся на 6.
2. С клавиатуры вводятся 13 целых чисел.Найти произведение нечётных.
Паскалем
Ответы
Автор ответа:
1
##
(106..996).Where(n -> n mod 6 = 0).Sum.Println;
ReadSeqInteger(13).Where(n -> n.IsOdd).Product(n -> BigInteger(n)).Print
Приложения:
Похожие вопросы
Предмет: Биология,
автор: Алина11122003
Предмет: Английский язык,
автор: DinoMF
Предмет: Литература,
автор: Аноним
Предмет: Биология,
автор: rid234