是mod吗??
15 mod 4???

解决方案 »

  1.   

      ShowMessage(FloatToStr(Trunc(15/4)));
      

  2.   

    procedure TForm1.Button1Click(Sender: TObject);
    var
      a,b,c:integer;
    begin
       a:=50;
       b:=20;
       c:=a div b;
       showmessage(inttostr(c));
    end;
      

  3.   

    Result := Rount(15/4)  =4,4舍5入
    Result := 15 div 4    =3
      

  4.   

    在 txt文件中如何判断回车啊
    pos(#13,s)为什么不对?
      

  5.   

    Rount(15/4)是四舍五入结果为4
    15 Div 4  只保留整数位,结果为3  
      

  6.   

    用Ceil(15/4) 或
    floor(15/4)