Выяснить можно ли построить треугольник с тремя данными сторонами.
Условие b+с>а и а+с>b и а+b>с. Стороны вводятся с клавиатуры.
В паскале

Ответ учителя по предмету Информатика

 Var A,B,C:real;

 Begin

 WriteLn(‘Введите длины сторон треугольника’);

 ReadLn(A,B,C);

 if (A<C+B)and(B<C+A)and(C<A+B) then WriteLn(‘Треугольник существует’)

 else WriteLn(‘Треугольник построить нельзя’)

 End.