program
segi3;
var
A,T :
integer
;
luas:
real
begin
read(A,T);
luas:=A*T/
2
writeln
(luas:
0
:
);
readln
end
.
Tidak ada komentar:
Posting Komentar