Дан массив из 10 элементов. Найдите количество элементов, больших 3, но меньших 10.

Основа, думаю такая должна быть gt;.gt;
p:=1;
for i:=1 to 10 do
  if (a[i] gt; 3) and (a[i] lt; 10) then
  p:=p+1;