delphi除法

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;

通过 Wiz 发布