Даны три натуральных числа a, b, c. Определите, существует ли треугольник с такими сторонами. Если треугольник существует, выведите строку YES, иначе выведите строку NO.

Question

Информатика

Ваня

6 ноября, 19:10

Даны три натуральных числа a, b, c. Определите, существует ли треугольник с такими сторонами. Если треугольник существует, выведите строку YES, иначе выведите строку NO.

+1

Ответы (1)

Знаете ответ?

Русланыч · Answer 1

var

a, b, c:real;

begin

write ('a = ') ; readln (a) ;

write ('b = ') ; readln (b) ;

write ('c = ') ; readln (c) ;

if (a + b > c) and

(a + c > b) and

(b + c > a) then

writeln ('YES')

else

writeln ('NO') ;

end.