FreePascal.ru

Начал изучать паскаль и столкнулся с рядом непонятных вещей:
1)Задача на площадь треугольника по формуле Герона, написал код:
var
a,b,c,p,s:integer;
begin
readln(a,b,c);
p:=((a+b+c) div 2)+((a+b+c) mod 2);
s:=sqrt(p*(p-a)*(p-b)*(p-c));
writeln(s);
readln;
end.

Скажите пожалуйста почему не работает ...