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 ('Треугольник не существует.'); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку