1樓：景茹煒
參考以下**， delphi xe3下編譯通過：
procedure tform1.button1click(sender: tobject);
vare1,e2,e3,e4:extended;
i,j:integer;
s1:string;
begin
e1:=strtofloat(edit1.text);
e2:=strtofloat(edit2.text);
e3:=e1/e2;//計算結果
e4:=e3-int(e3);//取小數部分
if e4>0.0 then
begin
e1:=e4*power(10,16);//小數點右移16位
e2:=e1-int(e1);//取小數部分
if e2>0.0 then //如果計算結果小數點16位後有值，則按16位輸出
i:=16
else begin //如果小數字在1與16之間，則
s1:=format('%0.16f',[e4]);
i:=16;
for j := length(s1) downto length(s1)-16+1 do
begin
if s1[j]<>'0' then //找第乙個不為零的位
begin
i:=j-2; //去掉0.兩位
break;
end;
end;
end;
endelse
i:=0;//表示計算結果為整數
memo1.lines.add(format('%*.*f',[3,i,e3]));
end;
2樓：
1）先判斷是整數，用整數計算
不是整數用實數計算
應該可以設定不帶0的輸出方式，沒有的話自己做乙個！
2）還有一種方法
自定義乙個型別
用字串或整數串表示資料，計算時按要求算好，然後直接輸出
包括小數點全部算好，再輸出。
3樓：
用formatfloat函式
ecel中計算結果怎樣用百分號表示
小丁創業 方法和詳細的操作步驟如下 1 第一步，開啟要操作的excel表，選擇相關的單元格，然後使用鍵盤組合鍵 ctrl 1 開啟數字單元格格式設定，見下圖，轉到下面的步驟。2 第二步，完成上述步驟後，單擊左側的 百分比 選項，然後選擇要顯示的小數字數，再單擊 確定 選項，見下圖，轉到下面的步驟。3...
求計算公式及計算結果，求計算公式以及結果
白日衣衫盡 等大的五個圓均勻放置，aoe 45 ob opsin45 50x 2 2 25 2bc pq 25 oc 25 25 2 正方形邊長 50 50 2 求excel計算公式大全 是振梅鄧嫻 應該是c2 b2 a 2，然後將公式往下拖。加上符號 就可以將單元格固定，在拖動的時候保持不變。 蒿...
c語言計算為什麼結果不對，c語言計算結果不對 哪裡有問題？
在double轉換成int時，應當考慮到數值並不準確的問題，可以考慮自己要求的精度極限，比如是0.00000001，可以寫成 printf d n int a pow 10,b 1 0.000000005 這樣可以配合取整實現在那位上的四捨五入。 gta小雞 計算整數的冪，不要使用pow函式，它返回...