找回密码
 立即注册

QQ登录

只需一步,快速开始

查看: 10806|回复: 18

[分享] 十进制转换成二进制的小程序

  [复制链接]

28

主题

67

回帖

146

积分

注册会员

积分
146
发表于 2013-8-18 12:29:46 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区

您需要 登录 才可以下载或查看,没有账号?立即注册

×
本帖最后由 羅蓋仙 于 2013-8-18 12:35 编辑 % Q# D4 L9 Z5 g; I8 c

1 C, q2 H3 V; m, j: E. K img014.jpg
9 u$ f% g( B0 D
$ _* T9 ^- {+ t# G* T7 ^5 o十进制转换成二进制:: M$ ~6 Y5 s# O; g+ O3 R
#1=181.(欲想转换成2进制的数值)+ c% g% P- C; O$ w
#101=ABS[FIX[#1]]- F9 j9 g& m2 k+ e2 z
#33=501.(储存到#501~)7 L8 r/ j8 B( C+ v! V7 H* Z3 S
WH[#101GE1.]DO1/ e3 |( t0 c- V4 o7 ?$ R# H
#[#33]=#101 MOD 2.
( |0 n: X# V  q0 c/ ^#101=FIX[#101/2.]* o& p  |' r5 `! Y/ \
#33=#33+1.
: s- F+ O& `  n; BEND1( A, @) G! T' [& c5 S$ G
M0& g) b0 ^, ]4 k( @6 b
7 V9 V1 P7 d! {2 w
结果:" ]) I, b% Y& l* S. h
#501=1.(低位)% N, S0 A" ?1 X) Y0 W3 m+ f; a
#502=0.: z% x3 r$ h$ f8 m$ l% Z
#503=1., ~+ x! h% ]* G' T% X2 Y
#504=0.
" |7 P" i9 M4 n) L: E#505=1.
( j9 W" ?0 n" ^* V* Q/ E5 v/ H, g#506=1.
9 {! I) L3 x0 o4 p3 t4 g4 Q' N: X& ]#507=0.8 F1 `, T7 b# K; s  ^
#508=1.(高位)1 }% V$ f# X8 e# [" {  U
+ ?- X& L0 m  s5 K! O8 \0 ?

* E4 I- W+ Q$ c) a8 u以下为10进制,想得知#101有几位数的小程序
9 q; b, w7 N+ ?#101=1234.
5 F/ F$ z  D4 ]+ Z" p, A1 i#10=1.(用1去比→用10去比→用100去比....)
( L! g$ ]% Q# {( c. l. c/ o  l#30=0.: _* K! A% ~2 v
WH[#101GE#10]DO1
, [! j8 s5 |0 {% c5 ^1 D#30=#30+1., C; x0 i. \/ N5 ]+ O
#10=#10*10.
4 X( ?5 r$ f8 v2 DEND1
5 c8 ~' Q; b* ?8 s: ?7 E0 |  z#30=有4位数(#101有4位数)
1 Y& h/ i8 _. s, B. mM0

28

主题

67

回帖

146

积分

注册会员

积分
146
 楼主| 发表于 2013-8-18 13:32:37 | 显示全部楼层
本帖最后由 羅蓋仙 于 2013-8-18 13:40 编辑 ! q% U; _  J% q/ H  \9 h- `, {

2 k& z/ \* f! A- i# `# Z如果嫌10进制转换成2进制,占了太多变量番号的空间* H; J6 ?" g9 F4 h6 E" H% i! _
我把它修改了一下
0 U2 g7 O( }. U0 d9 }  A#1=181.
( r& {2 b% a% D% K) O. o#101=ABS[FIX[#1]]5 E& d+ Q. r' a: e1 @5 I# ^2 w
#10=1.3 F, W, m5 o! E2 [
#500=0.& g0 G; h! v. h. u% n
WH[#101GT0.]DO1* W" r/ l( }" L. b
#500=#500+[#101 MOD 2.]*#102 F. @! I7 j/ Y
#101=FIX[#101/2.]
2 ^- T- d6 K5 R) k$ T#10=#10*10.
! y% r% {( P2 o8 j) w* F: |7 ]END1
+ r$ y3 h0 d' v; V. X2 C* b3 t; ]M0) x5 H% r' F) O
$ S9 w$ E7 R! {+ K8 l  K9 {0 z
结果:/ r" B! h# e0 j! q* T( Y
#500=10110101.
回复

使用道具 举报

0

主题

9

回帖

14

积分

新手上路

积分
14
发表于 2013-8-22 11:22:06 | 显示全部楼层
真精神!!!!!!
回复

使用道具 举报

28

主题

67

回帖

146

积分

注册会员

积分
146
 楼主| 发表于 2013-8-29 18:57:39 | 显示全部楼层
回复 4# ois90597
; T% s( w& {+ v0 V& {% h! v/ N$ h9 O2 {+ n- H
这是我那台湾某网友,我们互相分享讨论,他的写法感覺比我好:
$ _* J3 [# `" w1 r& j% Z! q! D1 t9 e#1=181.
9 N" k* Z5 M* K9 K- ]) S#10=10000000.0 l. U2 s" Q  L+ D2 b, c8 i( q) M
#31=FIX[ABS[#1]]7 Z6 Q1 T0 ~3 S# o# D* R
#32=128.
! D! f# V1 M, V2 Y5 J6 |1 s5 bIF[#31/#32GE2.]THEN#3000=200.
  a/ B6 e1 O/ E8 n, R0 DWHILE[#32GE1.]DO1
2 ], X5 ~) T( w' f4 ?#33=FIX[#31/#32]! A2 [3 y7 R  z' {$ @* j& }: v6 }9 i
#500=#500+#33*#10
6 L5 J. ?" I7 U+ ^) b& g- z/ D6 Q#31=#31-#32*[#33EQ1.]  e% Q8 M9 Q, c9 z
#32=#32/2.0 Q# T. Q$ G) ~' `
#10=#10/10.
9 C- A( q( T8 S* L7 t# FEND1# v+ T0 Q% B- X  r( a
M304 o7 i( V- b0 D0 x7 l2 G. A7 F

' g* q4 w& |2 Z# n8 p* r3 e% B4 A还是有改良的空间
回复

使用道具 举报

0

主题

53

回帖

36

积分

注册会员

积分
36
发表于 2013-9-21 22:25:07 | 显示全部楼层
回复 2# 羅蓋仙   u" k$ t! L* n& N
9 f! [: j; P, k5 c4 w7 N

& S6 g4 T& g+ R* }7 ~7 X( l- G, [    精辟
回复

使用道具 举报

0

主题

47

回帖

29

积分

注册会员

积分
29
发表于 2014-4-4 00:23:46 | 显示全部楼层
不错经典资料,值得学习
回复

使用道具 举报

3

主题

54

回帖

29

积分

注册会员

积分
29
发表于 2014-4-4 20:05:03 | 显示全部楼层
好久没来了  挺不错
回复

使用道具 举报

0

主题

71

回帖

42

积分

注册会员

积分
42
发表于 2015-1-8 10:49:17 | 显示全部楼层
很好,就是看不懂
回复

使用道具 举报

0

主题

407

回帖

631

积分

高级会员

积分
631
发表于 2015-2-18 16:18:28 | 显示全部楼层
學習,謝謝樓主分享
回复

使用道具 举报

0

主题

320

回帖

246

积分

注册会员

积分
246
发表于 2015-11-6 10:48:32 | 显示全部楼层
good..............
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关闭

站长推荐上一条 /2 下一条

QQ|Archiver|手机版|小黑屋|若枫后处理论坛 ( 苏ICP备11015087号-1|苏公网安备32059002001368号 )

GMT+8, 2026-6-23 21:42 , Processed in 0.505015 second(s), 27 queries .

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表