delphi 除法问题

2024-11-27 08:32:25

推荐回答（4个）

回答1：

你的c是整型，但是a /b 的结果实际上是个小数，所以赋值就会出错，你应该用整除符号，也就是
c:= a div b;

回答2：

c是integer整型
而a / b是Extended型。
如果你只要整数部分的结果，可以使用
c := a div b;
如果你要小数结果，可以使用
var
c: Extended;
begin
c := a/b;
edit3.text := floattostr(c);
end;

回答3：

因为你前面定义的c是integer
c:=a/b; 所以这里应该使用整除div，改成如下即可；
c:=a div b;

回答4：

c: Extended; % 实数与整数的区别
....
edit3.Text:= floattostr(c);