Turbo pascal változó kiírás problémák?

Kaptam informatika órára egy feladatot, egy programot kell írni amibe egy háromszög területét ki lehet számolni.

Eddig így néz ki:

Program hsztogt;

uses crt;

Var

a,b,c:integer;

clrscr;

write('Add meg a háromszög "a" oldalát centiméterben.(Egyik befogó): ');

read(a)

write('Add meg a háromszög "b" oldalát centiméterben.(Másik befogó): ');

read(b);

clrscr;

writeln('"a" oldal = ' ,a, ' "b" oldal =' ,b);

writeln('A háromszög területe: ' ,a*b/2, ' négyzetcentiméter');

end.

Eddig minden működik, de az a gond, hogy

pld. a=8 b=4

Eredmény = 1.6000000000000000E+0001

És elméletileg 16 négyzet centinek kéne lennie és úgy kéne, hogy nem ír maradékot semmit csak azt, hogy 16 (esetleg 1,2 tizedesig)