Составьте программу определяющую могут ли числа a, b, c являться длинами сторон треугольника. числа a, b, c, введите с клавиатуры

var a, b, c: integer;

begin

write ('Введите значение a: ');

read (a);

write ('Введите значение b: ');

read (b);

write ('Введите значение c: ');

read (c);

if (a < b + c) and (b < a + c) and (c < a + b) then

writeln ('Числа a, b, c могут являться длинами сторон треугольника.')

else

writeln ('Числа a, b, c не могут являться длинами сторон треугольника.');

end.