Question

составить программу, которая формирует массив из 8 целых случайных чисел от 0 до 10 и определяет количество чётных чисел

Answer 1

PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018

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

begin

 var a := ArrRandom(8, 0, 10);

 a.Println;

 $'Количество четных равно {a.Where(t->t.IsEven).Count}'.Println

end.