А именно, здесь указаны три
А именно, здесь указаны три неравенства треугольника и условия положительности длин сторон. При нарушении этих условий треугольника просто не существует и тем более нельзя говорить о его площади.
Для надежности программ такого рода ситуации (когда нет решений) должны быть предусмотрены в сценарии диалога. В этих случаях в сценарий необходимо включить сообщения с диагностикой причин отказов: отсутствие решений, недопустимость данных, некорректность команд, противоречивость фактов и т. п.
Алгоритм Программа
алг «площадь треугольника» ' площадь треугольника
нач cls
вывод («площадь треугольника») ? «площадь треугольника»
вывод («длины сторон:») ? «длины сторон:»
запрос («а=», a) input «a=», a
запрос («b=», b) inpnt «b=», b
запрос («с=», с) input «c=», c
если не (а > 0 и b > 0 и с > 0) то if a<=0 or b<=0 or c<=0 then
вывод («недопустимы длины») ? «недопустимы длины»
инеc не (а < b
+ с и b < а + elseif not (a < b+ с and b < а + с
+с и с<а+b)то and с < а + b) then
вывод («недопустимы длины») ? «недопустимы длины»
иначе else
р := (а + b + с)/2 р = (а+ b +с)/2
S :=
S = sqr (p*(p-a)*(p-b)*(p-c))
вывод («площадь=», S) ? «площадь=», S
Содержание Назад Вперед