Pascal информатика. определить лежит ли число в диапазоне (-30,60) , 15

PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  if ReadReal.Between(-30,60) then Writeln('Входит')
  else Writeln('Не входит')
end.

Var a:integer;
Begin
Read(a);
If (a>-30) and (a<60) then write('yes')
else write('no');
End.