Определить, существует ли треугольник со сторонами a, b, c, и если существует, то является ли он равносторонним. Ввести и вывести данные с помощью текстового файла.
var a, b, c: real; begin assign(input, 'input.txt'); reset(input); assign(output, 'output.txt'); rewrite(output); read(a, b, c); if (a b < c) or (a c < b) or (b c < a) then writeln('Не существует') else if (a = b) and (b = c) then writeln('Существует. Равносторонний') else writeln('Существует. Неравносторонний'); end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.