Дан массив, состоящий из 10 целых чисел. Элементы массива могут принимать Значения от 10 до 1000. Найти и вывести сумму наибольшего элемента массива кратного трем и наименьшего элемента массива, оканчивающегося на 7.
More Questions From This User See All
Answers & Comments
PascalABC.Net
begin
var a := ArrRandom(10, 10, 1000);
Println('Исходный массив:', a);
Println('Сумма: ', (a.Where(x -> x mod 3 = 0).Max) + (a.Where(x -> x mod 10 = 7).Min));
end.