60 поинтов Напишите программу для нахождения 23 ФАКТОРИАЛ, посчитайте ​

: Попробуй так

begin

var a := ArrRandom(50, 100, 999);

a.println;

writeln(a.Where(x -> (x mod 23 = 0)).Count);

end.