DIV和MOD函数怎么使用？

547504006

procedure TForm1.Button4Click(Sender: TObject);
var
  temp:integer;
begin
  temp:=strtoint(Edit1.Text);
  Label4.Caption:=inttostr(temp div 1000 mod 10);
end;

end.


这是一个取千位数的代码。
在实际执行过程中，
  Label4.Caption:=inttostr(temp div 1000 mod 10);
与
  Label4.Caption:=inttostr(temp div 1000);、
将mod 10放进去与不放进去，结果是一样的。
请问，放不放的区别是什么？

另外，div和mod函数，具体怎么用？麻烦举个例子

心驰神往

mod是取两个数相除的余数，div是取两个数相除的商。取千位的话直接用输入的数div1000取商就行了。
比如你输入的数是4321，用4321div1000得到的就是4，你用4mod10取余还是4，所以才会出现“将mod 10放进去与不放进去，结果是一样的”。
你如果输入五位数比如54321，正常情况下（不加mod10）显示你千位是54，加mod10千位显示就是54mod10取余，也就是4。

心驰神往

加上mod10是为了确保用户输入的整数位数大于四位时，千位能正确显示