Составить БСА и программу в тетради. Даны три положительных числа. Проверить, могут ли они быть длинами сторон треугольника. Если да, то вычислить площадь этого треугольника (по формуле Герона). очень срочно ( написать решение ) ( ПРОГРАММУ)
More Questions From This User See All
Answers & Comments
var a,b,c,p,s: real;
begin
write('Введите стороны треугольника: ');
readln(a,b,c);
if (a < b+c) and (b < a+c) and (c < a+b) then
begin
p:=(a+b+c)/2;
s:=sqrt(p*(p-a)*(p-b)*(p-c));
writeln('Площадь треугольника: ',s);
end
else writeln ('Треугольник не существует');
end.