Дан целочисленный массив размера N. Вывести все содержащиеся в данном
массиве четные числа в порядке возрастания их индексов, а также их количество
помогите пж сделать
Ответы
Ответ дал:
0
// PascalABC.NET 3.3
begin
var n:=ReadInteger('n =');
var a:=ArrRandom(n,10,90); a.Println;
Print(a.Where(x->x mod 2=0).Println.Count);
end.
Пример:
n = 10
12 76 26 69 90 86 71 71 45 44
12 76 26 90 86 44
6
begin
var n:=ReadInteger('n =');
var a:=ArrRandom(n,10,90); a.Println;
Print(a.Where(x->x mod 2=0).Println.Count);
end.
Пример:
n = 10
12 76 26 69 90 86 71 71 45 44
12 76 26 90 86 44
6
Вас заинтересует
2 года назад
3 года назад
3 года назад
9 лет назад
10 лет назад