real型的使用 除号 /
var
c:real;
begin
c:=7 / 3;
ShowMessage(floatToStr(c));
end;
整形的使用 div
var
c:Integer;
begin
c:=7 div 3;
ShowMessage(IntToStr(c));
end;