Впрограмме паскаль: вычислите площадь треугольника по его сторонам.

Сделано, шеф! 
Мне б кто физику решил, а ;)

Var a,b,c:integer;
s,p:real;
Begin
readln(a);
readln(b);
readln(c);
s:=0;
p:=0;
p:=(a+b+c)/2;
s:=sqrt(p*(p-a)*(p-b)*(p-c));
writeln('Площадь треугольника=',s);
end.