С клавиатуры вводятся три числа, которые есть углами треугольника. Написать програму Паскаль и вычислить может ли быть этот треугольник равносторонним, равнобедренным

С клавиатуры вводятся три числа, которые есть углами треугольника. Написать програму Паскаль и вычислить может ли быть этот треугольник равносторонним, равнобедренным
Гость
Ответ(ы) на вопрос:
Гость
В равностороннем треугольнике все три угла равны между собой и равны 60 градусов. В равнобедренном треугольнике два угла равны между собой и оба острые. В прочих треугольников значения всех трех углов различаются между собой. Эффективность алгоритма решения напрямую зависит от того, насколько успешно производится сравнение углов. Первый вариант программы (логика ЕСЛИ-ТО-ИНАЧЕ) program v1; var   a, b, c: real; begin   Write('Введите значения углов треугольника в градусах: ');   Readln(a, b, c);   if a = b then     if a = c then Writeln('Треугольник равносторонний')     else Writeln('Треугольник равнобедренный')   else   if a = c then Writeln('Треугольник равнобедренный')     else   if b = c then Writeln('Треугольник равнобедренный')   else Writeln('Все стороны треугольника имеют различную длину') end. Второй вариант программы (логические выражения) program v2; var   a, b, c: real; begin   Write('Введите значения углов треугольника в градусах: ');   Readln(a, b, c);   if (a = b) and (a = c) then Writeln('Треугольник равносторонний')   else   if (a = b) or (a = c) or (b = c) then Writeln('Треугольник равнобедренный')   else Writeln('Все стороны треугольника имеют различную длину') end. Тестовое решение: Введите значения углов треугольника в градусах: 75 30 75 Треугольник равнобедренный
Не нашли ответ?
Ответить на вопрос
Похожие вопросы