SQL循環(huán)結(jié)構(gòu)程序復(fù)習(xí)題

./循環(huán)結(jié)構(gòu)程序1.利用隨機(jī)函數(shù)RAND和函數(shù)floor,產(chǎn)生30個(gè)1到20之間的隨機(jī)整數(shù),使用WHILE語句顯示這30個(gè)隨機(jī)數(shù)。

declareiint,xintselecti=1whilei<=30beginsetx=FLOOR<RAND<>*<20-1+1>+1>seti=i+1printxend2.設(shè)紙的厚度為0.5毫米,將紙對折,再對折…,求至少對折多少次,紙X的厚度能達(dá)到珠穆朗瑪峰的高度8848米。

方法一：Declarehdecimal<10,1>,nintselecth=0.5,n=0whileh<8844000--運(yùn)算部分beginseth=h*2setn=n+1endselect'對折',n,'次后可以超過珠峰的高度‘-輸出部分方法二：Declarehdecimal<10,1>,nintselecth=0.5,n=0whileh<8844000--運(yùn)算部分beginsetn=n+1seth=0.5*power<2,n>end--select'對折',n,'次后可以超過珠峰的高度'print'對折'+ltrim<str<n>>+'次后可以超過珠峰的高度'3.求自然數(shù)1～100之間奇數(shù)之和

declareiint,sbigintselecti=1,s=0whilei<=100beginsets=s+iseti=i+2endselect's=',s4.編寫程序,輸出由1、2、3、4、5、6這六個(gè)數(shù)字組成的所有可能的兩位數(shù),并統(tǒng)計(jì)它們的個(gè)數(shù)。declarexint,iint,jint,nintsetx=123456seti=1setn=0whilei<=6beginsetj=1whilej<=6beginprintstr<i,1>+str<j,1>setn=n+1setj=j+1endseti=i+1endprint'n='+str<n,3>5.編寫程序,輸入一個(gè)數(shù),判定該數(shù)是否為素?cái)?shù),如果是素?cái)?shù),則輸出"該數(shù)是素?cái)?shù)"的信息,否則輸出"該數(shù)不是素?cái)?shù)"的信息。〔輸出50—100之間所有素?cái)?shù)〕方法一：用循環(huán)變量等于要判斷的數(shù)減一的方法來確定。declarexint,iintseti=2setx=6whilei<=x-1beginifx%i=0breakelseseti=i+1endifi=xprintstr<x>+‘是素?cái)?shù)'elseprintstr<x>+‘不是素?cái)?shù)'方法二：使用做記號(hào)的方法。declarexint,iint,jhbitsetjh=0--使用變量做記號(hào)seti=2setx=5whilei<=x-1beginifx%i=0beginsetjh=1breakendelseseti=i+1endifjh=0printstr<x>+‘是素?cái)?shù)'elseprintstr<x>+‘不是素?cái)?shù)'6.編程計(jì)算從1到30之間的所有7的倍數(shù)之和

declareiint,sbigintselecti=1,s=0whilei<=30beginifi%7=0sets=s+iseti=i+1endselect's=',s7.在國際象棋棋盤的64個(gè)格上依次放入小麥1粒、2粒、4粒、8?！?求按此規(guī)律放滿64個(gè)格需要多少粒小麥。

分析：后一個(gè)數(shù)是前一個(gè)數(shù)的2倍,得出通式為：X=2*Xdeclarexfloat,Sfloat,nbigintselectx=1,s=0,n=1whilen<=64beginsets=s+xsetx=2*xsetn=n+1printxendprint's='+cast<sasvarchar<40>>8.求自然數(shù)1～100之間偶數(shù)之和

declareiint,sbigintselecti=0,s=0whilei<=100beginsets=s+iseti=i+2endselect's=',s9.計(jì)算s=1+1/2+1/4+1/7+1/11+1/16+1/22+1/29+…當(dāng)?shù)趇項(xiàng)的值小于0.0004時(shí)結(jié)束。提示：找出規(guī)律,第i項(xiàng)的分母是前一項(xiàng)的分母加i減1。

declareiint,sfloat,fmfloat--i是項(xiàng)數(shù),fm是分母,s是所求的和值seti=1sets=0setfm=1while1/fm>0.0004beginsets=s+1/fmseti=i+1setfm=fm+i-1--第i項(xiàng)的分母是前一項(xiàng)的分母加i減1endprint's='+str<s,7,4>print'i='+str<i,7,4>--查看一下第多少項(xiàng)時(shí)1/fm為0.0004print'fm='+str<fm,7,4>--查看一下1/fm為0.0004時(shí)的fm是多少注意:分母〔fm〕必須定義為float類型,不能定義為int,因兩個(gè)整數(shù)相除商為整數(shù)而得不到小數(shù)。10.編寫程序,在100～999三位整數(shù)X圍內(nèi),找出這樣的數(shù)<水仙花數(shù)>：該數(shù)等于其各位數(shù)字的立方和。如：371=3^3+7^3+1^3,即371就是水仙花數(shù)。注意：3^3表示3的3次方,7^3表示7的3次方,1^3表示1的3次方?！舱页鏊械乃苫〝?shù)〕分析：首先要會(huì)將數(shù)進(jìn)行分解,分解的方法我們講過至少3種。第一種,一般的分解方法：Declarexint,aint,bint,cint,sintsetx=456Seta=floor<x/100>--取出百位上的數(shù)字Setb=floor<<x-a*100>/10>--取出十位上的數(shù)字setc=x-a*100-b*10--取出個(gè)位上的數(shù)字使用以上分解數(shù)的方法所編代碼為：Declarexint,aint,bint,cintprint'100-999之間的所有水仙花是：'setx=100whilex<=999beginSeta=floor<x/100>--取出百位上的數(shù)字Setb=floor<<x-a*100>/10>--取出十位上的數(shù)字setc=x-a*100-b*10--取出個(gè)位上的數(shù)字ifpower<a,3>+power<b,3>+power<c,3>=xprintxsetx=x+1end第二種,找通式方法：假設(shè)x=1234個(gè)位=<Floor<x/1>>%10十位=<Floor<x/10>>%10百位=<Floor<x/100>>%10千位=<Floor<x/1000>>%10通式：X〔i〕=FLOOR<X/10〔i-1〕>%10i從個(gè)位數(shù)起。使用以上分解數(shù)的方法所編代碼為：Declarexint,aint,bint,cintprint'100-999之間的所有水仙花是：'setx=100whilex<=999beginSeta=<Floor<x/100>>%10--取出百位上的數(shù)字Setb=<Floor<x/10>>%10--取出十位上的數(shù)字setc=<Floor<x/1>>%10--取出個(gè)位上的數(shù)字ifpower<a,3>+power<b,3>+power<c,3>=xprintxsetx=x+1end第三種,取子串的方法Declarexint,aint,bint,cintprint'100-999之間的所有水仙花是：'setx=100whilex<=999beginSeta=str<substring<cast<xaschar<3>>,1,1>,1>--取出百位上的數(shù)字Setb=str<substring<cast<xaschar<3>>,2,1>,1>--取出十位上的數(shù)字setc=str<substring<cast<xaschar<3>>,3,1>,1>--取出個(gè)位上的數(shù)字ifpower<a,3>+power<b,3>+power<c,3>=xprintxsetx=x+1end提示：代碼中的cast<xaschar<3>>是將數(shù)值型的X轉(zhuǎn)換為字符型數(shù)據(jù),之后用substring函數(shù)取子串,然后再將字符型數(shù)據(jù)用str函數(shù)轉(zhuǎn)換為數(shù)值型數(shù)據(jù)。11.計(jì)算1！+2！+…+20！

方法一：使用雙循環(huán)即循環(huán)嵌套來實(shí)現(xiàn)。declares1float,S2float,iint,jintseti=1sets1=0whilei<=4beginsetj=1sets2=1whilej<=ibeginsets2=s2*jsetj=j+1endprintstr<j-1,2>+'!='+ltrim<str<s2>>sets1=s1+s2seti=i+1endprint'1!+2!+3!+...的和s1='+cast<s1asvarchar<40>>方法二：使用單循環(huán)也可實(shí)現(xiàn)。declares1float,S2float,iint,jintseti=1sets1=0--用來存放和值sets2=1--用來存放階乘值whilei<=4beginsets2=s2*isets1=s1+s2seti=i+1endprint'1!+2!+3!+...的和s1='+cast<s1asvarchar<40>>類似的題目還有：s=1+<1+2>+<1+2+3>+<1+2+3+4>+….+<1+2+#+…+n>,模仿上例自己編程實(shí)現(xiàn)。12.利用循環(huán)結(jié)構(gòu)求s的值,S=1*2*3+2*3*4+…+i*<i+1>*<i+2>+…+15*16*17的值。declares1float,S2float,iint,jintseti=1sets1=0--用來存放和值sets2=1--用來存放乘積whilei<=3beginsets2=i*<i+1>*<i+2>sets1=s1+s2seti=i+1endprint'1*2*3+2*3*4+…+i*<i+1>*<i+2>+…+15*16*17的和s1='+cast<s1asvarchar<40>>13.有一個(gè)分?jǐn)?shù)序列,求出這個(gè)序列的前20項(xiàng)之和。2/1,3/2,5/3,8/5,13/8,21/13,….提示：后一項(xiàng)是前一項(xiàng)的倒數(shù)加1。

declaresfloat,xfloat,iintseti=1sets=0--用來存放和值setx=2/1whilei<=20beginsets=s+xseti=i+1setx=1/x+1--后一項(xiàng)是前一項(xiàng)的倒數(shù)加1endprint'2/1,3/2,5/3,8/5,13/8,21/13的前20項(xiàng)的和s='+cast<sasvarchar<40>>14.計(jì)算1^3+2^3+3^3+…+100^3.注意：1^3表示1的3次方,2^3表示2的3次方,…,100^3表示100的3次方。declaresbigint,iintseti=1sets=0--用來存放和值whilei<=100beginsets=s+power<i,3>seti=i+1endprint'1^3+2^3+3^3+…+100^3的和s='+cast<sasvarchar<40>>15.編寫程序,用Print語句顯示1～50之間的奇數(shù)

declareiintprint'顯示1～50之間的奇數(shù)'seti=1whilei<=50beginprintiseti=i+2end16.求s=a+aa+aaa+…+aaa…aaa<n個(gè)a>,其中a和n的值由用戶使用Set或Select語句自己輸入。例如,當(dāng)a=3,n=4時(shí),S=3+33+333+3333。方法一：用重復(fù)產(chǎn)生字符函數(shù)REPLICATE編程：declareachar<1>,tvarchar<50>,sint,nintseta='3'sets=0setn=1whilen<=5beginsett=REPLICATE<a,n>printtsets=s+tsetn=n+1endprints或declareiint,avarchar<10>,sbigintprint'求a+aa+aaa+…+aaa…aaa<n個(gè)a>的和'sets=0seti=1seta='5'whilei<=4beginseta='5'seta=replicate<a,i>printasets=s+cast<aasint>seti=i+1endprint'求a+aa+aaa+…+aaa…aaa<n個(gè)a>的和s='+ltrim<str<s,15>>法二下面方法更簡單Declareaint,nint,sint,tintSeta=3--某一項(xiàng)中的數(shù)字Setn=1項(xiàng)數(shù)sett=3--某一項(xiàng)變量Sets=0--累加變量Whilen<=4BeginSets=s+tsett=t*10+aSetn=n+1EndPrints其他方法：Declareaint,nint,sintSeta=3Setn=1Sets=0Whilen<=4BeginSets=s+a*<power<10,n>-1>/9Setn=n+1EndPrints其他方法：按位權(quán)展開法如X=123按位權(quán)展開法得到結(jié)果為：X=1*102+2*101+3*100,可得通式為X=X+Floor<<<a/10^<i-1>>>%10>*10^<i-1>說明：公式中的Floor<<<a/10^<i-1>>>%10>,