Даны действительные числа а, 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.