(整理)2進(jìn)制數(shù)之間的轉(zhuǎn)換及應(yīng)用(包含源程序).

1、精品文檔精品文檔不同進(jìn)制數(shù)之間的轉(zhuǎn)換及應(yīng)用在計算機(jī)領(lǐng)域中，有時需將不同進(jìn)制之間進(jìn)行轉(zhuǎn)換，如十進(jìn)制數(shù)轉(zhuǎn)換成二進(jìn)制數(shù)、八進(jìn)制數(shù)和十六進(jìn)制數(shù)等，以及進(jìn)行逆轉(zhuǎn)換。 不同進(jìn)制數(shù)之間轉(zhuǎn)換的基本算法：1） 十進(jìn)制數(shù)（x）轉(zhuǎn)換成任意進(jìn)制數(shù)（n）的方法：將十進(jìn)制數(shù)除以n進(jìn)制反序取余。2） 將任意進(jìn)制數(shù)轉(zhuǎn)化程成十進(jìn)制數(shù)方法：按權(quán)展開。3） 二進(jìn)制數(shù)、八進(jìn)制數(shù)、十六進(jìn)制數(shù)之間的轉(zhuǎn)換方法：利用三位二進(jìn)制數(shù)表示一位八進(jìn)制數(shù)， 位十六進(jìn)制數(shù)的方法。1、不同進(jìn)制數(shù)的轉(zhuǎn)換：例1、將十進(jìn)制數(shù)轉(zhuǎn)換成任意進(jìn)制數(shù)的（nn then begin writeln(error)exit;end;4位二進(jìn)制數(shù)表示A,B,C,D,E,F表示1

2、015的數(shù)，將余數(shù)在轉(zhuǎn)換為字符類型進(jìn)行處理。5位數(shù)，如，精品文檔y:=y*n;writeln（x,）；t:=t+al*y;end.en d;當(dāng)x=100110,n=2,輸出：100110384）將十進(jìn)制小數(shù)轉(zhuǎn)換為其他進(jìn)制的數(shù)：將十進(jìn)制小數(shù)乘以待轉(zhuǎn)換的進(jìn)制數(shù)正向取整的方法。程序自己實(shí)現(xiàn)（略）。2、數(shù)的進(jìn)制應(yīng)用。例1、用三進(jìn)制數(shù)求解數(shù)學(xué)問題。用質(zhì)量為1g,3g,9g,21g,81g的砝碼稱物體的質(zhì)量，最大可稱121g。如果砝碼允許放在天平的兩邊，編程輸出秤不同物體時砝碼應(yīng)該怎樣安排？例如m=14g時，m+9+3+1=27,即天平一端放m=14的物體和9g,3g,1g的砝碼，另一端 放27g的砝碼。

3、Program tia npin;Var a,b,c,d,e,m:i nteger;BeginFor m:=1 to 121 doFor a:=-1 to 1 doFor b:=-1 to 1 doFor c:=-1 to 1 doFor d:=-1 to 1 doFor e:=-1 to 1 doIf m:=a*81 +b*27+c*9+d*3+e thenBegi nWriteln（m, =,a*81,+ ,b*27, +,c*9,+ ,d*3, + ,e）;Readl n;En d;End.例*2、走路問題：小明每天上學(xué)要從街口A到街口B，求他從街口A到街口B的向前路（不后退）一共有多少

4、走法？應(yīng)該怎樣走？如下圖:圖1 Program zoulu;Const m=4;n=6;Var t,p,x,I,j,k,a:i nteger;BeginT:=1;P:=m+n;For x:=1 to p-(m-1) do For I:=x+1 to p-(m-2) do精品文檔精品文檔For j:=l+1 to p-(m-3) doFor k:=j+1 to p-(m-4) doB精品文檔BeginWrite( no:,t,-);For a:=1 to p doIf (a=x) or (a=l) or (a=j) or (a=k) the n write(1:2) else write(0:2

5、);Write In;T:=t+1;En d;Writel n( total=,t-1);End.例*3、將2An個0和2An個1排列成一圈。從任意一個位置開始，每次按逆時針的方向以長度為n+1的單位計數(shù)二進(jìn)制數(shù)。要求給出一種排法，用上面的方法產(chǎn)生出2A(n+1)個不同的二進(jìn)制數(shù)。如當(dāng)n=2時，有2A2個0和2A2個1排列如圖2所示。如果從a位置開始，逆時針方向取三個數(shù)000，然后再從b位置開始取三個數(shù)001，接著取010,?？梢缘玫?個不同的二進(jìn)制數(shù)。001011 1 0Program she ngshu;If t in s the n begi nCo nst max n=16;m=127

6、;S:=s-t;Type ts= set of 0.m;Ak:=1;產(chǎn)生n個1Var n :1.max n;B:=bbb(k-1,t);A:array1.m of in teger ;If not b the n s:=s+tS:ts;EndP,y,l:i nteger;Else b:=false;Function bbb(k,t:i nteger):boolea n;en d;Var b:BooIea n;bbb:=b;BeginEn d;If k=0 the n bbb:=trueEn d;Else begi nBegin 主程序T:= t div 2;Readl n(n);writel

7、n(k:=,k:4,t:=,t);p:=1;If t in s the n beg infor i:=1 to n doS:=s -t;從集合s中除去tp:=P*2; 計算2人門Ak:=0;產(chǎn)生n個0for i:=1 to p+n-1 doB:=bbb(k-1,t);ai:=0;If not b the n s:=s+t;s:=1.p-1;Endif bbb(p-1,0) thenElse b:=false;beginIf not b the nwritel n( p-1:=,p-1);Begi nfor i:=1 to p do write(ai:2);輸出每一位T:=t+ p div 2; 產(chǎn)生下