составьте программку которая по трем введенным вами числам определить ,могут ли

помогите пожалуйста

Program treyg;
uses crt;
var a,b,c : integer;
begin Write('Введите три числа');
Readln(a,b,c);if (alt;b+c) and (blt;a+c) and (clt;a+b) 
then Writeln('Эти числа могут быть длинами сторон треугольника')
else
Writeln('Треугольника с такими гранями не существует');
end.