В одномерном массиве подсчитать сумму элементов с четным индексом (сгенерировать элементы массива с помощью датчика случайных чисел). В одномерном массиве вывести все элементы массива, которые...

Вам нужно узнать решение и ответ на вопрос В одномерном массиве подсчитать сумму элементов с четным индексом (сгенерировать элементы массива с помощью датчика случайных чисел). В одномерном массиве вывести все элементы массива, которые... и правильно выполнить домашнюю работу по предмету Информатика? Готовое решение смотрите далее.

В одномерном массиве подсчитать сумму элементов с четным индексом (сгенерировать элементы массива с помощью датчика случайных чисел). В одномерном массиве вывести все элементы массива, которые меньше пяти (сгенерировать элементы массива с помощью датчика случайных чисел; кол-во элементов массива введите с клавиатуры). В одномерном массиве подсчитать сумму всех элементов массива, оканчивающихся на 3 (сгенерировать элементы массива с помощью датчика случайных чисел; кол-во элементов массива введите с клавиатуры).

// PascalABC.NET 3.3, сборка 1627 от 27.01.2018

// Внимание! Если программа не работает, обновите версию!

// Программа №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.


Подобные ответы

скажите пожалуйста в задаче ответ 7
скажите пожалуйста в задаче ответ 7
ПОЖАЛУЙСТААА ПОМОГИТЕ С ТЕСТОМ
ПОЖАЛУЙСТААА ПОМОГИТЕ С ТЕСТОМ