1. Задаем переменные a, b, c типа real
2. Задаем переменную ind типа boolean (значения true и false)
3. Начало программы
4. ind = true
5. Выводим на экран запрос на 3 вещественных числа
6. Вводим числа a, b, c
7, 8, 9. Если любое из этих чисел отрицательно, то ind = false
10. Если c < a, то выполняем действия:
начало оператора
1) В переменную c сохраняем a + c
2) В переменную a сохраняем c - a, то есть в а попадает a + c - a = c
3) В переменную c сохраняем c - a, то есть в с попадает a + c - c = a
Таким образом, мы меняем местами переменные а и с.
конец оператора
11. Если c < b, то точно также меняем местами b и с.
В итоге этих двух операторов Если в переменную а будет записано наименьшее из чисел, в b - среднее, в с - наибольшее.
12. Если c > a+b, то ind = false
13. Если (ind = true) и (с^2 = a^2 + b^2), то
14. выводим ответ: "Треугольник прямоугольный"
15. Если (ind = true) и (с^2 < a^2 + b^2), то
16. выводим ответ: "Треугольник тупоугольный"
17. Если (ind = true) и (с^2 > a^2 + b^2), то
18. выводим ответ: "Треугольник остроугольный"
19. Если ind = false, то выводим ответ: "Треугольник не существует"
20. Конец программы.
Смысл этой программы: мы вводим три числа и проверяем, могут ли они быть длинами сторон треугольника.
Они не могут быть длинами в следующих случаях:
1) какое-то из чисел (одно или больше) отрицательно
2) сумма двух чисел меньше третьего числа.
А если могут, то какого типа этот треугольник.
По теореме косинусов, если сумма квадратов двух коротких сторон больше, чем квадрат самой длинной стороны, то это остроугольный треугольник.
Если сумма квадратов равна квадрату третьей стороны - прямоугольный.
А если сумма квадратов меньше квадрата третьей - тупоугольный.
Поэтому в программе ошибка: в 15 и 17 строках знаки нужно поменять.
Должно быть так:
15. Если (ind = true) и (с^2 > a^2 + b^2), то
16. выводим ответ: "Треугольник тупоугольный"
17. Если (ind = true) и (с^2 < a^2 + b^2), то
18. выводим ответ: "Треугольник остроугольный"