В основной программе вводятся стороны треугольника a, b, c. В модуле проверяются неравенства треугольника (a меньше b+c; b меньше a+c; c меньше a+b) и вычисляется площадь треугольника. Ввести данные двух треугольников и вывест...
В основной программе вводятся стороны треугольника a, b, c. В модуле проверяются неравенства треугольника (a
Гость
Гость
Ответ(ы) на вопрос:
ГостьProgram n1;
var a,b,c: real;
procedure tr(a,b,c: real );
var p,S: real;
begin
if (a
Не нашли ответ?
Похожие вопросы