Составить программу, которая определяет возможность существования треугольника по трем введенным сторонам. Треугольник существует только тогда, когда сумма любых двух его сторон больше третьей.
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 ('Треугольник не существует.');
readln
end.