Предмет: Информатика, автор: pecurkinmaksim79

Помогите пожалуйста
1. Составить программу, находящую сумму всех трёхзначных чисел, оканчивающихся на 6.

2. С клавиатуры вводятся 13 целых чисел.Найти произведение нечётных.

Паскалем

Ответы

Автор ответа: BobbyFresnel
1

##

(106..996).Where(n -> n mod 6 = 0).Sum.Println;

ReadSeqInteger(13).Where(n -> n.IsOdd).Product(n -> BigInteger(n)).Print

Приложения:
Похожие вопросы
Предмет: Биология, автор: Алина11122003
Предмет: Литература, автор: Аноним