BOULEVARDDEPO111
01.01.2021 04:26

1 Дан целочисленный массив размера N. Вывести все содержащиеся в данном массиве четные числа в порядке возрастания их индексов, а также их количество.

2 Дан целочисленный массив размера N. Вывести все содержащиеся в данном массиве нечетные числа в порядке убывания их индексов, а также их количество.

3 Дан целочисленный массив размера N. Вывести вначале все содержащиеся в данном массиве четные числа в порядке возрастания их индексов, а затем все содержащиеся в данном массиве нечетные числа в порядке убывания их индексов.

4 Дан целочисленный массив размера N. Вывести все содержащиеся в данном массиве числа, кратные 3 в порядке возрастания их индексов, а также их количество и сумму.

5 Дан массив размера N. Вычислить среднее арифметическое элементов массива и вывести результат.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
galina060876
12.10.2020 22:06

// PascalABC.NET 3.6

begin

 var n := ReadInteger('N =');

 var a := ArrRandom(n, -99, 99);

 a.Println;

 a.Where(p -> p.IsEven).Println.Count.Println; // 1

 a.Where(p -> p.IsOdd).Reverse.Println.Count.Println; // 2

 (a.Where(p -> p.IsEven) + a.Where(p -> p.IsOdd).Reverse).Println; // 3

 var s := a.Where(p -> p mod 3 = 0).Println; // 4

 Println(s.Count, s.Sum); // 4

 a.Average.Println // 5

end.


1 Дан целочисленный массив размера N. Вывести все содержащиеся в данном массиве четные числа в поряд
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота