pascal如何利用双精度浮点数做除法？得出来的结果求整数

{$n+e-}var a,b:double; i,j:integer;begin a:=12.3; b:=24.5; i:=round(b/a); j:=trunc(b/a); writeln(i:6,j:6);end.