Дана строка. Если она представляет собой запись целого числа, то вывести 1, если...

Question

Дана строка.
Если она представляет собой запись целого числа, то вывести 1, если
вещественного (с дробной частью) — вывести 2; если строку нельзя
преобразовать в число, то вывести 0. Считать, что дробная
часть вещественного числа отделяется от его целой части десятичной точкой «.».

Answer 1

var
  s: string;
  t: integer;
  t1: real;

begin
  readln(s);
  if not (Integer.TryParse(s, t)) then
    if not (Real.TryParse(s, t1)) then
      t := 0
    else
      t := 2
  else
    t := 1;
  writeln(t);
end.

Comments

либо я дурак,либо не работает)

---

Работает... На какой строке ошибка?

---

if not (Integer.TryParse(s, t)) then