1.Дан одномерный массив (заданный случайным
образом), состоящий из 15 элементов. Написать программу нахождения
суммы наибольшего и наименьшего элемента из данного массива.
2. Дан массив, состоящий из 100 чисел. Числа
выбираются случайным образом. Написать программу вывода
количества целых чисел, кратных решить это задание
// PascalABC.NET
begin
// 1
var a := ArrRandom(15, -99, 99);
a.Println;
Println(a.Min + a.Max);
Writeln; // эта строка только для разделения решений
// 2
var b := ArrRandom(100, -99, 99);
b.Println.Count(p -> p mod 3 = 0).Print
end.