亚洲二区精品_国产精品com_日本高清精品_国产高清一级毛片在线不卡

若楓后處理論壇

標題: 十進制轉換成二進制的小程序 [打印本頁]
作者: 羅蓋仙    時間: 2013-8-18 12:29
標題: 十進制轉換成二進制的小程序
本帖最后由 羅蓋仙 于 2013-8-18 12:35 編輯
- k- j. D# w- ^# ~) P8 \' Y: B
9 [2 ^$ X) V5 f[attach]7280[/attach]) R3 P9 u2 z1 J( k$ H

! q/ e9 v1 {. Q  I$ M十進制轉換成二進制：8 Y1 G4 e4 b9 v3 A/ _9 h) o
#1=181.(欲想轉換成2進制的數值)
* E. i5 Y+ g' b) w/ J/ L# M#101=ABS[FIX[#1]], i- C) S9 B/ i! G6 f& q6 W
#33=501.(儲存到#501～): l* K$ w: L- J5 S7 t
WH[#101GE1.]DO1+ D- `+ `+ K& S: K2 j
#[#33]=#101 MOD 2./ p* j* j4 n. G. j* ?
#101=FIX[#101/2.]2 [2 {. K8 v* L, O
#33=#33+1., c# q4 O$ Z4 |$ J; ]$ V
END11 O. D& O! O% w) }& s2 k* A
M0
$ ^9 g! A3 e5 ^$ k% k  r9 p2 q% H# |+ M& ]* j
結果：
2 n# `" a- `7 y9 L6 d5 a# u3 k* R8 {#501=1.(低位)7 G, q0 o, z! _+ O: N
#502=0., I1 D7 [: s2 K/ l( P5 G$ {7 L& |1 V. a
#503=1.
3 H/ a, b0 F8 g; _6 }. ?* L! T#504=0.
7 s/ S5 H/ c) z, E$ w" [#505=1.
  m7 x! Y# \* \9 U#506=1.
9 z1 A2 E' B9 X- q#507=0.3 M/ h1 }! x( ?
#508=1.(高位)' j  Z  A+ V6 x, m
' g! q8 d7 ~4 x- B$ m

5 P% D' y" f9 M( G0 @. }以下為10進制，想得知＃101有幾位數的小程序. j  Z( p& t' x% d
#101=1234.
! w) q/ J; X5 _+ w  [5 o#10=1.(用1去比→用10去比→用100去比....)
1 @% [% W& o  S. o2 |8 I#30=0.: @( r. K/ o2 o# y8 z, d& ~: X$ S" ?
WH[#101GE#10]DO1$ g$ w8 B; o, J* b5 A
#30=#30+1.& `+ a# k1 Y/ V" Q# r( [
#10=#10*10.
; J8 e( \" W5 f2 L* {& NEND12 f% f% Z% g+ A8 B7 ~; t! B& O
#30=有4位數(#101有4位數)7 v/ R6 S# l, Q+ \  L% t, v: j
M0
作者: 羅蓋仙    時間: 2013-8-18 13:32
本帖最后由 羅蓋仙 于 2013-8-18 13:40 編輯
3 N. @6 [. |/ j5 ~+ a5 {! k5 w+ v  x- e9 o
如果嫌10進制轉換成2進制，占了太多變量番號的空間
& ~0 w$ G) N, Z/ N我把它修改了一下- s4 H1 J- I# i6 z) U9 X
#1=181.  f; P5 h5 ~- L
#101=ABS[FIX[#1]]
0 b1 a, ?2 Y1 x& {#10=1.
2 p9 X& k' H, F#500=0.
5 @  S9 o( d7 c% n) I9 W+ rWH[#101GT0.]DO1
) F& T  s- d/ [- B# L#500=#500+[#101 MOD 2.]*#10
6 f) R2 P# z! o9 |# w  O6 @#101=FIX[#101/2.]
% ]' \. {! X5 `9 U#10=#10*10./ K. Y  ?5 _9 H4 G/ U& Q' O: }
END1
8 P+ r9 |5 v' T+ ]M0) y3 Q: c0 @+ _$ a: a' z) F( P
+ k9 K; P- X1 i9 |* ^8 ?0 ~
結果：
1 y+ b4 }6 k: r#500=10110101.
作者: 丹存印才    時間: 2013-8-22 11:22
真精神！！！！！！
作者: 羅蓋仙    時間: 2013-8-29 18:57
回復 4# ois90597
  d6 u8 z+ @" W2 P* `
/ ]# {* r6 g8 ?- `- c2 a這是我那臺灣某網友，我們互相分享討論，他的寫法感覺比我好：* B3 Y3 G: o: Z# X7 N# P
＃1=181.# L2 G8 N6 o, o% ?9 [: G% N
#10=10000000." d) ]( @- D. j$ Q9 E( B7 A
#31=FIX[ABS[#1]]: v1 d9 ]( K8 `" ^$ q8 L. `
#32=128.
5 f3 z, M( J, S! @" qIF[#31/#32GE2.]THEN#3000=200.- D" W* K1 ~. W4 z/ S5 }! L
WHILE[#32GE1.]DO1+ x0 j& V" S- Y' S, \
#33=FIX[#31/#32]" X. f  L: a6 a% U
#500=#500+#33*#10
/ H4 G% K, Q$ v  k$ e#31=#31-#32*[#33EQ1.]
  C* }" K7 J' B; z/ B5 r! J; c2 `#32=#32/2.. \4 k- K. [% D1 w
#10=#10/10.: l& G# i% t) _' S
END1
# L( S0 u. G1 F6 LM30, A3 v- d- f; x9 G4 B

) f' K! Y7 H" e8 B5 M' D( h5 u還是有改良的空間
作者: bruceding    時間: 2013-9-21 22:25
回復 2# 羅蓋仙
4 z2 z( K, a/ Z
% Q5 |5 F+ e4 ^+ R: e( A, K) n, r1 X( U. o; S3 N
    精辟
作者: zhangjun    時間: 2014-4-4 00:23
不錯經典資料，值得學習
作者: wslaoa    時間: 2014-4-4 20:05
好久沒來了  挺不錯
作者: getto    時間: 2015-1-8 10:49
很好，就是看不懂
作者: ya_blueang    時間: 2015-2-18 16:18
學習，謝謝樓主分享
作者: 919616    時間: 2015-11-6 10:48
good..............
作者: GD_lx558    時間: 2015-12-5 15:15
這個看不懂呀
作者: sbb52038    時間: 2017-7-24 11:36
有沒二進制轉十進制的程式
作者: boye28    時間: 2017-7-24 21:35
好東西，多看看，也能學會不少東西
作者: qq9051349    時間: 2017-9-29 08:22
對宏一點不了解，該怎么著手學習呢！
作者: niejinyun    時間: 2018-3-16 11:25
多多發帖回帖就可以賺錢，呵呵，我有很多錢了
作者: abnor    時間: 2018-5-23 21:04
厲害了，樓主高手 啊
2 V3 J- `, B! V! V4 d" w- B
作者: 1426437527    時間: 2021-6-21 13:18
謝謝分享，謝謝分享
作者: 1426437527    時間: 2021-8-11 13:05
宏程序程序比較復雜暫時看不懂
作者: 云與海的故事    時間: 2024-4-23 11:50
不錯經典資料，值得學習



歡迎光臨 若楓后處理論壇 (http://m.buddhismlove.com/) Powered by Discuz! X3.5