資源描述：
《編程題資料(附答案)》由會(huì)員上傳分享，免費(fèi)在線閱讀，更多相關(guān)內(nèi)容在工程資料-天天文庫(kù)。
1、1)已知ΔABC的兩條邊和夾角：A=3.0,B=4.0,∠C=600，求三角形的面積A=3B=4C=PI()/3AREA=A*B*SIN(C)/2?”AREA=”,AREA2)鍵盤(pán)輸入一個(gè)大寫(xiě)字母，要求輸出它的ASCII碼及其對(duì)應(yīng)的小寫(xiě)字母INPUT“輸入一個(gè)大寫(xiě)字母:”TOCH?CH,“的ASCII碼為”,ASC(CH)?CH,“對(duì)應(yīng)的小寫(xiě)字母為”,CHR(ASC(CH)+32)3)求兩個(gè)電阻R1=3Ω，R2=6Ω的串聯(lián)值和并聯(lián)值R1=3R2=6RS=R1+R2RP=1/(1/R1+1/R2)?“串聯(lián)等效電阻為”,RS,“歐姆”?“并聯(lián)等效電阻為”,RP,“歐姆”4)設(shè)某
2、工廠2004年的產(chǎn)量為100，若年增長(zhǎng)率為5%，則到2010年的產(chǎn)量是多少？?“到2010年的年產(chǎn)量為”,100*(1+0.05)^(2010-2006)5)輸入兩個(gè)數(shù)和一個(gè)運(yùn)算符(加、減、乘、除)，求其值。例如,輸入3和5以及*,則輸出15INPUT“輸入一個(gè)數(shù):”TOAINPUT“輸入另一個(gè)數(shù):”TOBINPUT“輸入運(yùn)算符:”TOCHDOCASECASECH=“+”?“兩數(shù)之和為:”,A+BCASECH=”-“?“兩數(shù)之差為:”,A-BCASECH=”*”?“兩數(shù)之積為:”,A*BCASECH=“/”?“兩數(shù)之商為:”,A/BOTHERWISE?“運(yùn)算符有錯(cuò)!”END
3、CASE6)設(shè)交納所得稅的規(guī)定如下：收入<=1500元免交所得稅1500元<收入<=3000元所得稅為5%3000元<收入<=6000元所得稅為8%6000元<收入<=10000元所得稅為10%10000元<收入<=50000元所得稅為15%收入>50000元所得稅為20%請(qǐng)編程，從鍵盤(pán)輸入一個(gè)數(shù)，計(jì)算應(yīng)交納的所得稅。INPUT“INCOME=”TOXDOCASECASEX<=1500TAX=0CASEX<=3000TAX=(X-1500)*0.05CASEX<=6000TAX=(X-3000)*0.08+(3000-1500)*0.05CASEX<=10000TAX=(X
4、-6000)*0.1+(6000-3000)*0.08+(3000-1500)*0.05CASEX<=50000TAX=(X-10000)*0.15+(10000-6000)*0.1+(6000-3000)*0.08+(3000-1500)*0.05OTHERWISETAX=(X-50000)*0.2+(50000-10000)*0.15+(10000-6000)*0.1&+(6000-3000)*0.08+(3000-1500)*0.05ENDCASE?“INCOMETAXIS”,TAX,“元”7）完成下面分段函數(shù)的計(jì)算，程序運(yùn)行時(shí)用戶(hù)從鍵盤(pán)輸入一個(gè)數(shù)值X，在屏幕上輸出Y
5、值。INPUT"請(qǐng)輸入X值："TOXIFX>0Y=X*XELSEIFX=0Y=0ELSEY=-(X*X)ENDIFENDIF?Y8)求SUM=0FORI=1TO21STEP2SUM=SUM+I^3ENDFOR?”SUM=”,SUM9)通過(guò)鍵盤(pán)輸入一串字符，統(tǒng)計(jì)并輸出其中英文字母的個(gè)數(shù)。INPUT“輸入一個(gè)字符串”TOSL=LEN(S)N=0FORI=1TOLCH=SUBSTR(S,I,1)IFCH>=”A”ANDCH<=”Z”O(jiān)RCH>=”a”ANDCH<=”z”N=N+1ENDIFENDFOR?”字符串中有”,N,”個(gè)英文字母”RETURN10)輸入一個(gè)少于10位的整數(shù),
6、求該數(shù)有幾位,并按其倒序輸出該數(shù)INPUT“輸入一個(gè)少于10位的正整數(shù):”TONACCEPT“以字符串形式輸入整數(shù):”TOSTL=LEN(ST)?"該數(shù)的倒數(shù)為:"FORI=LTO1STEP–1??SUBSTR(ST,I,1)ENDFOR?“該數(shù)共有”,L,“位”S=LTRIM(STR(N))L=LEN(S)?"該數(shù)的倒數(shù)為:"FORI=LTO1STEP–1??SUBSTR(S,I,1)ENDFOR?“該數(shù)共有”,L,“位”10)有一分?jǐn)?shù)序列，求前20項(xiàng)之和M=1N=2SUM=0FORI=1TO20TERM=N/MSUM=SUM+TERMX=NN=M+NM=XTERM=N/
7、MENDFOR?”SUM=”,SUM11)建立一個(gè)五行五列的矩陣，求出外圍所有元素之和。DIMENSIONA(5,5)S=0S1=0FORI=1TO5FORJ=1TO5INPUTTOA(I,J)S=S+A(I,J)ENDFORENDFORFORI=2TO4FORJ=2TO4S1=S1+A(I,J)ENDFORENDFOR?S-S113)從鍵盤(pán)輸入一個(gè)八進(jìn)制數(shù)，將其轉(zhuǎn)換成等值的十進(jìn)制數(shù)。CLEARSETTALKOFFS=0INPUT"ENTERANOCTALNUMBER:"TONL=LEN(N)FORI=1TOLS=
