Водномерном массиве подсчитать сумму элементов с четным индексом (сгенерировать элементы массива с датчика случайных чисел). в одномерном массиве вывести все элементы массива, которые меньше пяти (сгенерировать элементы массива с датчика случайных чисел; кол-во элементов массива введите с клавиатуры). в одномерном массиве подсчитать сумму всех элементов массива, оканчивающихся на 3 (сгенерировать элементы массива с датчика случайных чисел; кол-во элементов массива введите с клавиатуры).
// Внимание! Если программа не работает, обновите версию!
// Программа №1
begin
var mas:=ArrRandom(20,-99,99); mas.Println;
Writeln('сумму с четным индексом=',mas.Where((v,i)->i mod 2 =0).Sum);
end.
// Программа №2
begin
var n:=readinteger('n=');
var mas:=ArrRandom(n,-99,99); mas.Println;
Writeln('элементы < 5');
mas.Where(t->t<5).Println;
end.
//Программа №3
begin
var n:=readinteger('n=');
var mas:=ArrRandom(n,-99,99); mas.Println;
Write('Сумма=');
mas.Where(t->t mod 10 = 3).Sum.Println;
end.