Дан массив из 15 целых чисел.найти количество целых чисел > 10,но < 15. ! надо составить программу

Массив заполним случайными целыми от 0 до 20

//PascalABC.NET (версия 3.1, сборка 1198 от 11.03.2016)
begin
var a:=arrrandom(15,0,20);
println(a);
var s:=0;
 for var i:= 0 to 14 do
  if (a[i]>10) and (a[i]<15) then s +=1;
 println('таких чисел ',s);
end.