delphi單精度浮點數計算程式

2021-08-10 22:11:12 字數 722 閱讀 5288

1樓:匿名使用者

這個是ieee754 轉換的吧., 給你個**.

function ieee754dtof(const adata: dword): single;

vars, m, e: integer;

// i: integer;

begin

trys:= (adata and  $80000000) shr 31;

e:= (adata and $7f800000) shr 23;

m:= adata and  $7fffff;

result:= power(-1, s) * (1 + m/$7fffff) * power(2, e-127);

except

result:=0;

end;

end;

2樓:匿名使用者

varbuf : array[0..1] of word; //unsignle 16bit int

begin

buf[0] := $0000;

buf[1] := $4260;

showmessage( floattostr( psingle(@buf[0])^));

end;

3樓:匿名使用者

edit2.text :=inttostr(strtoint64(('$'+edit1.text)));

c語言中用scanf輸入雙精度浮點數

c語言中用scanf輸入雙精度浮點數的源 如下 include include int main int n,a,i printf 請輸入陣列長度 scanf d n a malloc sizeof int n 分配記憶體 printf 請輸入 d個數 n n for i 0 i n i scanf...

浮點數的科學計數法

如果是10進位制 那麼應該是 n 11.0101 0.110101 10 2 1.10101 10 1 1101.01 10 2 但這兒是二進位制,而 2 10 10 2 1 10 1 4 100 n 11.0101 0.110101 10 2 0.110101 2 10 1.10101 10 1 ...

C語言 呼叫自定義交換函式,完成浮點數從小到大排列

正如樓上所說,這個方法是很多的。我舉一個例子 include void swap double x,double y 定義交換函式 main for i 0 i 3 i 氣泡排序for j 0 j 3 i j if st j st j 1 swap st j st j 1 for i 0 i 5 i...