Даны два угла треугольника (в градусах). Определить, существует ли такой треугольник. Если да, то будет ли он прямоугольным.
Даны два угла треугольника (в градусах). Определить, существует ли такой треугольник. Если да, то будет ли он прямоугольным.
1 2 3 4 5 6 7 8 9 10 11 12 13 |
var a,b: integer; begin writeln ('введит два угла в градусах'); readln (a,b); If a+b<180 then begin writeln ('Треугольник существует'); if (a=90) or (b=90) or (a+b=90)then writeln ('Треугольник прямоугольный'); end else writeln ('Треугольник не существует'); end. |
Будем благодарны, если вы поделитесь данной записью со своими друзьями в социальных сетях, оставите отзыв и посмотрите другие материалы на нашем сайте.