Цитата:
Сообщение от matrinishna
5.Даны действительные числа А, В, С. По трём сторонам с длинами А, В, С можно построить треугольник.Найти площадь треугольника.
|
Код:
var
a,b,c:integer;
s,p:real;
begin
write ('a=');
readln(a);
write ('b=');
readln (b);
write ('c=');
readln(c);
p:=(a+b+c)/2;
s:=sqrt(p*(p-a)*(p-b)*(p-c));
writeln ('S=',s);
readln
end.