Даны действительные числа а, b, с, которые обозначают длины трех отрезков. если можно построить треугольник с такими длинами сторон, то найдите его периметр, если нет- сообщите об этом

//прога на Pascal`е
var
  a, b, c : double;
begin
write ('Введите стороны треугольника: ');
read (a, b, c);
   if (a>=b+c) or (b>=a+c) or (c>=b+a) then
   write ('Такого треугольника не существует')
   else write ('P треугольника = ', a+b+c) ;
  
end.