Проверка типов в Паскале

Мне просто интересно, как можно сделать проверку типов в паскале? Я искал часы, но я не смог найти ничего полезного.

Пример:

var 
number: Integer;

begin
  write('Enter a number: ');
  read(number);

  if {How am I supposed to check if 'number' is an Integer here?}
  then writeln(number)
  else writeln('Invalid input')
end.