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

//прога на Pascal`еvar  a, b, c : double;beginwrite ('Введите стороны треугольника: ');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.