Boolean31. Даны целые числа $$a$$, $$b$$, $$c$$, являющиеся сторонами некоторого треугольника. Проверить истинность высказывания: «Треугольник со сторонами $$a$$, $$b$$, $$c$$ является равнобедренным».
Решение:
|
1 2 3 4 5 6 7 8 9 10 11 12 |
program Boolean31; var a, b, c: Integer; begin Write('Введите 1 сторону треугольника: '); Readln(a); Write('Введите 2 сторону треугольника: '); Readln(b); Write('Введите 3 сторону треугольника: '); Readln(c); Writeln((a=b) or (b=c) or (c=a)); end. |
Другие задачи из раздела Boolean можно посмотреть здесь.
так же равносторонний треугольник будет равнобедренным, поэтому еще ((a=b)and(a=c))
Что то я не понял комментария…
«Равнобедренный треугольник — это треугольник, в котором две стороны равны между собой по длине. »
Writeln((a=b) or (b=c) or (c=a));
проверяет совпадет ли хотя бы две стороны в треугольнике. Включая вариант ((a=b)and(a=c)).
вы правы, я не учел что в вашем решении равенство всех сторон не исключено логикой