delphi中的求余

来源:百度知道 编辑:UC知道 时间:2024/07/07 02:54:01
请问4 mod 5,运行后的结果为什么等于4?delphi是怎么算的?最好把运算过程也写出来,郁闷小学数学都算不来了,嗨

不关Delphi的事,就是这样算的..(4除以5除不尽,余自己..)
测试:
procedure TForm1.Button1Click(Sender: TObject);
var
X,
Y: Word;
begin
DivMod(4, 2, X, Y);
ShowMessage( Format('除值:%d,余数:%d',[X, Y]) );
end;