Var a,b,c:integer; begin readln(a,b,c); if (a<b+c) and (b<a+c) and (c<a+b) then writeln('Треугольник существует') else writeln('Треугольник не существует'); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
