小學(xué)信息競(jìng)賽試題

運(yùn)發(fā)動(dòng)號(hào)碼牌〔number.bas〕號(hào)碼1“1”12號(hào)碼是“6”，只有1張“6”號(hào)碼牌；而李飛的號(hào)碼是“1111”4“1”號(hào)碼牌組成。愛動(dòng)腦筋的小杰就想了：假設(shè)學(xué)校的運(yùn)發(fā)動(dòng)數(shù)是N,這十種號(hào)碼牌多少張呢？請(qǐng)你編寫一個(gè)〔24〕【樣例輸入】(鍵盤輸入運(yùn)發(fā)動(dòng)人數(shù)N,N<2000)15〔分別對(duì)應(yīng)號(hào)碼0-9需要的張數(shù)〕1822221111DOINPUTNLOOPUNTILN>0ANDN<2000DIMA$(N)DIMS(0TO9)FORI=1TONA$(I)=MID$(STR$(I),2)NEXTIFORI=0TO9FORJ=1TONS$=MID$(STR$(I),2)L=LEN(A$(J))FORK=1TOLIFMID$(A$(J),K,1)=S$THENS(I)=S(I)+1NEXTKNEXTJNEXTIFORI=0TO9PRINTS(I);NEXTIEND找朋友〔friend.bas〕看到自己的號(hào)碼是“1111”小杰思考了一會(huì)說：“按二進(jìn)制換算，我的號(hào)碼才是‘1111’呢”。果真不錯(cuò)，十進(jìn)制的“15”換算成二進(jìn)制可不是“1111”4‘1’，4‘1’、號(hào)碼數(shù)值比我的大且數(shù)值差最小的1-NM〔26〕【樣例輸入】(鍵盤輸入某位同學(xué)的十進(jìn)制數(shù)號(hào)碼M)17〔他和他的朋友的號(hào)碼的十進(jìn)制形式及二進(jìn)制形式〕17:1000118:10010INPUTNDIMA(N),B(N)Y=N:J=1:S=0DOWHILEY<>0R=YMOD2A(J)=RY=Y\2J=J+1IFR=1THENS=S+1LOOPFORI=N+1TO2500Y=I:JJ=1:SS=0DOWHILEY<>0R=YMOD2B(JJ)=RY=Y\2JJ=JJ+1IFR=1THENSS=SS+1LOOPIFSS=STHENEXITFORNEXTIIFI>2500THENPRINT“NO“:ENDPRINTN;“:“;FORK=J-1TO1STEP-1PRINTUSING“#“;A(K);NEXTKPRINTPRINTI;“:“;FORK=JJ-1TO1STEP-1PRINTUSING“#“;B(K);NEXTKEND推算〔calc.basN〔N<=2001-NA(1)~A(N)〔26〕【樣例輸入】(鍵盤輸入N、A(1)~A(N))4，0，0，1，3〔按現(xiàn)在的隊(duì)列挨次輸出原來的運(yùn)發(fā)動(dòng)號(hào)碼〕3，1，2，4INPUTNDIMA(N),B(N),C(N)FORI=1TONINPUTA(I)NEXTIFORI=NTO1STEP-1B(I)=A(I)+1FORJ=1TONIFC(J)<>0AND(J<B(I)ORJ=B(I))THENB(I)=B(I)+1NEXTJC(B(I))=1NEXTIFORI=1TONPRINTB(I);NEXTIEND隊(duì)列〔queue.bas〕N1~N以有N位男生和N獨(dú)在隊(duì)列中〔11。請(qǐng)你編程幫助小杰計(jì)算一下共有多少種方案？N從鍵盤輸入，N<100，要求輸出準(zhǔn)確數(shù)值。如：N=47〔24〕【樣例輸入】(鍵盤輸入N)4〔方案數(shù)〕7INPUTNDIMA(N)ASDOUBLEIFN>=1THENA(1)=1IFN>=2THENA(2)=2IFN>=3THENA(3)=4FORI=4TONA(I)=2*A(I-1)-A(I-2)+A(I-3)NEXTIPRINTA(N)END2004n(n<100)，現(xiàn)在要選出一個(gè)同學(xué)當(dāng)班長(zhǎng)。承受的方法1kk1kk隊(duì)時(shí)，從頭開頭數(shù)，應(yīng)當(dāng)站在什么位置。請(qǐng)你編程幫小雪實(shí)現(xiàn)。(20例如：輸入：1003CLSINPUT“n=“;nINPUT“k=“;kDIMa(n):s=nFORi=1TOn:a(i)=1:NEXTii=0:b=1DOUNTILs=k-23p=0DOUNTILp=ki=i+b:IFi>nORi<1THEN2p=p+a(i):IFs=k-1ANDa(i)=1THENPRINTi:ENDLOOPa(i)=0s=s-1LOOP2b=-b:GOTO3【問題描述】(12分)

歌德巴赫猜測(cè)4開頭直至任一給定的大于4的偶數(shù)分解為兩個(gè)素?cái)?shù)并打印出來。例如：輸入：10輸出：4=2+2 6=3+3 8=3+5 10=3+7【程序清單】INPUTNFORI=4TONSTEP2X=1X=X+1IFX=2THEN70FORP=2TOSQR(X)IFXmodＰ＝０THEN30NEXTPY=Ｉ－ＸIFY=2THEN110FORP=2TOSQR(Y)IFＹmodＰ=0THEN30NEXTPPRINTI;“=“;X;“+“;Y,NEXTIEND乘車費(fèi)用〔taxi.bas/taxi.pas/taxi.c〕【問題描述】WW和幾個(gè)同學(xué)一起幫助W2.562.5公里之后按1.2/101.2/公里的根底上加價(jià)50%，費(fèi)WWNMW【輸入文件】輸入文件共有一行，包含兩個(gè)整數(shù)N，M，分別表示出租車行駛的里程和中間停車的時(shí)間，中間以空格分開，0≤N≤200，0≤M≤60。【輸出文件】輸出僅包含一個(gè)整數(shù)，表示小W應(yīng)付的乘車費(fèi)用，四舍五入到整數(shù)元?！据斎霕永?7【輸出樣例】14OPEN“taxi.in“FORINPUTAS#1OPEN“taxi.out“FOROUTPUTAS#2INPUT#1,n,mIFn>10THENs=6+(n-2.5)*1.2+(n-10)*1.2*.5ELSEIFn>2.5THENs=6+(n-2.5)*1.2ELSEIF(n<=2.5)AND(n>0)THENs=6ELSEs=0ENDIFENDIFENDIFfy=INT(s+m\5+.5)PRINT#2,LTRIM$(STR$(fy));CLOSEEND裝球問題(151，2，3，??。同時(shí)有K(K＞0)，現(xiàn)將K個(gè)小球裝入到盒子中去，裝入規(guī)章如下：第一個(gè)盒子不能空；裝入必需嚴(yán)格按遞增的挨次進(jìn)展；K=8，N=6：1，2，51，3，4在滿足上面的兩個(gè)條件下，要求有球的盒子盡量多；裝完之后，相鄰盒子中球個(gè)數(shù)差確實(shí)定值之和為最小(未裝的盒子不

如上例中：裝入法1，2，5則差確實(shí)定值之和為：2-1+5-2=4裝入法1，3，4則差確實(shí)定值之和為：3-1+4-3=3【程序要求】給出K(K表示小球個(gè)數(shù))之后，求出滿足上述四個(gè)條件的裝放方法。【算法描述】A，用數(shù)組元素代表盒子，然后依次裝入小球?！境绦蚯鍐巍縉=20DIMA(N)INPUTKj=1DOWHILEK>=JA(j)=j:K=K-J :j=j+1LOOPL=J-1DOWHILEK<>0A(L)=A(L)+1:K=K-1:L=L-1LOOPFORI=1TOJ-1 PRINTA(I);NEXTEND分解質(zhì)因數(shù)(存盤程序名：yinshu.bas)問題描述分解質(zhì)因數(shù)是小學(xué)數(shù)學(xué)中常見的問題，現(xiàn)在給定一個(gè)正整數(shù)N，請(qǐng)你編程序?qū)分解質(zhì)因數(shù)，并將分解式輸出。數(shù)據(jù)輸入：從文件yinshu.in中讀入數(shù)據(jù)，文件中只有一個(gè)正整數(shù)NN<=3276。數(shù)據(jù)輸出：結(jié)果輸出到文件yinshu.out中，只有一行，就是N分解成質(zhì)因子的連乘積的式子，并且要求按因子從小到大從左到右的格式輸出。輸入輸出樣例樣例一：Yinshu.in24Yinshu.out24=2*2*2*3樣例二：Yinshu.in13Yinshu.out13=13CLSOPEN“yinshu.in“FORINPUTAS#1OPEN“yinshu.out“FOROUTPUTAS#2DOINPUT#1,nLOOPUNTILn<=32767ANDn>0x=2PRINT#2,n;“=“;IFn>-1ANDn<2THENPRINT#2,n:ENDDOIFn=xTHENPRINT#2,x:EXITDOIFnMODx=0THENPRINT#2,x;“*“;:n=n/xELSEx=x+1LOOPCLOSEEND程序２clsdoinputaloopuntila<=32767anda>=1b=2ifa>-1anda<2then?a:enddoifa=bthen?b:exitforifamodb=0