Даны положительные целые числа A, B, C. Выяснить существует ли треугольник

USES Crt; VAR nbsp;nbsp;A, B, C: INTEGER;
BEGIN
nbsp;nbsp;ClrScr;
nbsp;nbsp;WriteLn(Введите три числа);
nbsp;nbsp;nbsp;ReadLn(A,B,C);
nbsp;nbsp;IF (A+Bgt;C) AND (A+Cgt;B) AND (B+Cgt;A) Then WriteLn(Треугольник выстроить можно)
nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;Else WriteLn(Треугольник выстроить нельзя);
END.