С клавиатуры вводятся стороны треугольника. Выполнить проверку, существует ли такой треугольник? ( free pascal ) СРОЧНО!

Question

inga_zajonc · Accepted Answer

находим самый длинный отрезок. Если сумма оставшихся меньше, треугольника не существует.

krab_bark_6 · Answer

program triangle;   
var a,b,c,p:real;   
begin  
write('a b c: '); read(a,b,c); p:=(a+b+c)/2;  writeln(p*(p-a)*(p-b)*(p-c)>0);  
end.