运算的中间结果用一个变量存储，显示时根据需要四舍五入。var
rVal:Real;
begin
rVal := 1/3;
edit1.text := formatfloat('0.00000000000',rVal); edit2.text := formatfloat('0.00000000000',StrToFloat(edit1.text)*3); //这是你的方法 rVal := rVal*3;
edit3.text := formatfloat('0.00000000000',rVal); //这样就可以了
1 mod 3 * 3
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024