Дан одномерный массив состоящий из 10 элементов.найти кол во чисел кратных 7

//PascalABC.Net 3.1.0.1200
begin
    var a := ArrRandomInteger(10, 1, 100);
    writeln(a.Where(x -> x mod 7 = 0).Count);
end.