Составить программу, в которой описывается массив переменных, состоящий из 15 целых чисел, инициализируется массив вводом с клавиатуры, выводятся элементы массива экран через пробел. для полученного массива найти сумму всех четных элементов и произведение элементов, меньших 10.
21alex1488
3
17.11.2019 19:28
8 
Популярные вопросы
- Вычислить.а)5/21+9/14 б)5/21: 9/14 в)5/21-9/14*5/18...
1 - Есть 7 слов моль ноль толь соль лось боль роль нужно еще одно слово...
1 - Моторная лодка км против течения реки и 16 км по течению,затратив...
2 - Груз массой 5 кг поднимают из состояния покоя с ускорением 1.5 м/с2...
3 - Help найдите абсциссы точек пересечения графиков функций y=4/x и...
1 - Два огорода имеют одинаковую площадь. ширина первого огорода 60 метров,а...
3 - Вкаких случаях в вопросе пишется are/is и do/does? 1. are you ok?...
3 - Кданным наречиям подберите наречия с противоположные значением. вблизи...
2 - Обьясните как мне решать эти примеры на тему формулы двойного угла!...
3 - Перестройте предложения так, чтобы в них между подлежащим и сказуемым...
2
begin
var a := ReadArrInteger('Вводи:', 15);
a.Println;
Println('Сумма четных:', a.Where(p -> p.IsEven).Sum);
Println('Произведение меньших 9:', a.Where(p -> p < 10).
Aggregate(real(1), (p, q) -> p * q))
end.