Имеется массив А(1.h). Подсчитать количество элементов массива кратных некоторому числу P

Спасибо

Пожалуйста. Но все же пишите хотя бы А(1..h) про массив, или A[1..h], а лучше просто A(h)

// PascalABC.NET 3.3, сборка 1583 от 25.11.2017// Внимание! Если программа не работает, обновите версию!begin  var a:=ArrRandom(ReadInteger('h='),-99,99); a.Println;  var p:=ReadInteger('P=');  Writeln(a.Where(t->t mod p=0).Count,' элементов,кратных ',p)end.Примерh= 5055 28 15 -95 70 -68 -3 -82 -64 -62 -3 -64 -85 15 55 73 77 -94 54 12 -48 -62 28 67 80 96 28 -45 37 76 -40 24 -73 -30 -16 -97 -38 99 30 17 -1 -25 5 -42 85 -62 1 -97 -87 -30P= 93 элементов,кратных 9