// Введите не число
// Посмотрите, как выглядит ошибка при выполнении программы

begin
  var i := ReadInteger;
end.