Question

Скласти програму для перевірки існування трикутника зі сторонами а,b, c.

Answer 1

var a, b, c: integer;  
begin
write (' Длины сторон: ');
readln (a,b,c);  
if (a < b+c) and (b < a+c) and (c < a+b) then
writeln ('Треугольник существует.')
else writeln ('Треугольник не существует.');  
end.