Question

РЕШИТЕ ПОЖАЛУЙСТА ЗАДАЧУ ПО ИНФОРМАТИКЕ​

Answer 1

program treugolnik;

var a,b,c:real;

begin

   write('vvedi a,b,c ');

   readln( a,b,c);

   writeln('tr-k sushestvuet');

   write((a<b+c)and(b<a+c)and(c<a+b));

end.