版權(quán)說(shuō)明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)
文檔簡(jiǎn)介
1、精品文檔精品文檔D.實(shí)數(shù)1.3D) X=X+A)1/2*(AB)*HB)(A+B)*H/2C)(A+B)/2*HD)0.5*(A+B)*H9.要選拔身高T>1.7米且體重W<62.5公斤的人FORTRAN勺邏輯表達(dá)式是A)T.ce.1.7.AND.w.le.62.5C)T.gt.1.7. AND.w.lt.62.5B) T.le.1.7.OR.w.ge.62.5D)T.gt.1.7.OR.w.lt.62.5高級(jí)語(yǔ)言程序設(shè)計(jì)(FORTRAN)考試樣題一、選擇題(每小題2分,共40分)1. 下列標(biāo)識(shí)符中不能作為 FORTRA的合法變量名的是 D.A) A_1 B) A1C) A1AD)
2、 A+12. 在FORTRA的變量類(lèi)型說(shuō)明語(yǔ)句中沒(méi)有BA) REAL 語(yǔ)句B)CHAR語(yǔ)句 C)INTEGER語(yǔ)句 D)LOGICAL 語(yǔ)句3. FORTRAN9C源程序的擴(kuò)展名是 _C。A. TXTB. F C. F90D. FOR4. 下列關(guān)于符號(hào)常量的說(shuō)法正確的是C。A. 符號(hào)常量的定義應(yīng)該放在所有語(yǔ)句之前B. 符號(hào)常量不可以是字符型常量C. 在一個(gè)程序單位中定義一個(gè)符號(hào)常量后,不能再改變它的值D. 符號(hào)常量定義語(yǔ)句與賦值語(yǔ)句一樣,是可執(zhí)行語(yǔ)句5. 在下列寫(xiě)法中, _D不是FORTRA常量。A. .TRUE. B.1E-2 C. (0.0,2.4)D.1,000,0006. 表達(dá)式15/
3、4/2.0的值是 B。A.整數(shù)2B.實(shí)數(shù)1. 5C.實(shí)數(shù)2. 257. 下列不是FORTRA賦值語(yǔ)句的是 D。A) X=.TRUE.B) X=X*XC) X=X*2*28.梯形的上底為A,下底為B,高為H,計(jì)算其面積的FORTRA表達(dá)式中錯(cuò)誤的是10. FORTRAN 9(規(guī)定,變量類(lèi)型聲明的優(yōu)先順序是_CA.隱含約定(I-N規(guī)則)、IMPLICIT聲明、類(lèi)型聲明B. 類(lèi)型聲明、隱含約定(I-N規(guī)則)'IMPLICIT聲明C. 類(lèi)型聲明、IMPLICIT聲明、隱含約定(I-N規(guī)則)D. IMPLICIT聲明、類(lèi)型聲明、隱含約定(I-N規(guī)則)11、假設(shè)CH是一個(gè)字符型變量,并且具有足夠的
4、長(zhǎng)度,則對(duì)于CH(3:7),下面說(shuō)法正確的是_DA.它是一個(gè)數(shù)組片段B.它是一個(gè)數(shù)組定義形式C.它是CH的一個(gè)子串,并且長(zhǎng)度是4 D.它是CH的一個(gè)子串,并且長(zhǎng)度是512數(shù)組聲明語(yǔ)句為:INTEGER,DIMENSION(-5:-1,-3:3,11:15) :A數(shù)組共有 A個(gè)元素。A. 175 B . 150 C . 120D. 1713. 下列DATA語(yǔ)句中正確的是C。A) DATA /A,B/-1.0, -1.0/B) DATA A, B/2*(-1.0)/C) DATA A, B/2*-1.0/D) DATA A/-1.0, B/-1.014. 下列有關(guān)FORTRA數(shù)組的說(shuō)法正確的是 D
5、<A) 數(shù)組定義語(yǔ)句只能定義一維或二維數(shù)組B) 數(shù)組元素下標(biāo)不能出現(xiàn)負(fù)值C) 在賦值語(yǔ)句中出現(xiàn)的A(3)肯定是數(shù)組元素D) 程序中使用的數(shù)組必須進(jìn)行說(shuō)明精品文檔15. 一個(gè)完整的FORTRAN源程序的組成不應(yīng)該D。A)只有一個(gè)主程序沒(méi)有子程序B)有一個(gè)主程序和若干子程序C)有一個(gè)主程序和一個(gè)子程序D)只有子程序而沒(méi)有主程序16閱讀下列FORTRAI程序:DO K=2,4,2S=S+1/KEND DOWRITE(*,*)SEND執(zhí)行上述程序后,輸出的S值為CA) 0.75 B) 1.75C) 0.0 D)17. 閱讀下列程序INTEGER M(3,3)DATA M/1,2,3,4,5,6,
6、7,8,9/WRITE(*,10)(M(3,J),J=1,3)10 FORMAT(1X,3I2)END程序運(yùn)行結(jié)果是B。A)2 5 8B)3 6 918. 閱讀下列程序K(X,Y)=X/Y+XA=-2.0B=4.0B=1.0+K(A,B)WRITE(*,10)B10 FORMAT(1X,F4.1)END程序運(yùn)行結(jié)果是AA)-1.0B)1.0B)2.019. 閱讀下列FORTRA程序:DO I=4,2,-1A=1.0DO J=I,4,2A=A+1.0ENDDOENDDOWRITE(*,*)AEND運(yùn)行上述程序后,輸出的 A值為 A) 5.0B) 4.0C) 3.020. 可調(diào)數(shù)組_B中出現(xiàn)。A.
7、只能在主程序C.只能在主程序和子程序1.0C)4 5 6D)7 8 9D)3.0C。D) 2.0B.只能在子程序D.可以在主程序、子程序和模塊二、填空題(每空 2分,共36分)1、結(jié)構(gòu)化程序設(shè)計(jì)的三種基本結(jié)構(gòu)為:順序結(jié)構(gòu)、選擇結(jié)構(gòu)和循環(huán)結(jié)構(gòu)精品文檔2、 已知 A B、C都是整型變量,且A=3, B=4, C=5,計(jì)算表達(dá)式 C/2>2.AND.A+B=C的值為:_.FALSE. _。n3、 將數(shù)學(xué)表達(dá)式 e2x +ln|Sin 2x-Sinx 2|寫(xiě)成正確的 FORTRA表達(dá)式為:_ EXP(3.14/2*X)+LOG(ABS(SIN(X)*2-SIN(X*2)。4、 N是一個(gè)個(gè)位不等于
8、 0的兩位自然數(shù),寫(xiě)一個(gè)表達(dá)式將 N的個(gè)位數(shù)與十位數(shù)互換,得到一個(gè)新的數(shù)。MOD(N,10)*10+N/10。5、 已知I是整型變量,當(dāng)DO結(jié)構(gòu)從“正常出口”結(jié)束時(shí),語(yǔ)句“ DO I= 3,15,2 ”共計(jì)完成了7次循環(huán)。6、 下列程序的運(yùn)行顯示結(jié)果是什么_ .TURE. 。LOGICAL PINTEGER I,I1,I2,I3P=.FALSE.I=123I1=MOD(I,10)I2=MOD(I/10,10)I3=I/100IF(I1+I3.EQ.2*I2)P=.TRUE.PRINT*,PEND7、下列程序的運(yùn)行顯示結(jié)果是什么_ K=6。K=0DO N=21,10,-1IF (MOD(N,2)
9、=0)K=K+1END DOPRINT*, "K=",KEND8、下列程序的運(yùn)行顯示結(jié)果是什么_ 14 5。M=0DO J=1,4DO K=J-1,4M=M+1END DOEND DOWRITE(*,*)M,JEND9、下列程序的運(yùn)行顯示結(jié)果是什么_ 5167.0。SUM=1.0J=1DO WHILE (J.L E.3)F=1DO I=2,2*J+1F=F*IENDDOSUM=SUM+FJ=J+1END DO精品文檔PRINT*,SUMEND10. 下列程序的運(yùn)行顯示結(jié)果是什么_S=15.00 。DIMENSION X(3,3)DATA X/1,2,3,4,5,6,7,8,
10、9/S=0DO I=1,3S=S+X(I,4-I)ENDDOWRITE(*,20) S20 FORMAT(1X; S=' ,F6.2)END:1,4,5,6,8。11. 下列程序?qū)⒁粋€(gè)數(shù)組的元素逆序重新存放,例如存放順序?yàn)椋?,6,5,4,1 。要求改為請(qǐng)?jiān)跈M線處填寫(xiě)適當(dāng)語(yǔ)句,使程序完整。INTEGER,PARAMETER:N=5INTEGER A(N),I,TDATA A/8,6,5,4,1/WRITE(*,10)(A(I),I=1,5)DO I=1,N/2T=A(I)A(l)=A(N-l+1)A(N-I+1)=T END DOWRITE(*,10)(A(I),I=1,5)10 FO
11、RMAT(1X,5I4)END12. 下列程序完成按以下格式打印楊輝三角形的前N行:11 11 2 11 3 3 11 46 4 1請(qǐng)?jiān)跈M線處填寫(xiě)適當(dāng)語(yǔ)句,使程序完整。PARAMETER(N=10)INTEGER A(N,N),I,JDO I=1,NA(I,1)=1A(I,I)=1ENDDODO I=3,NDO J=2,I-1 A(l,J)=A(l-1,J)+A(l-1,J-1)ENDDOENDDODO I=1,NWRITE(*,10)(A(I,J),J=1,I)ENDDO精品文檔10 FORMAT(1X,10I5)END13. 下列子例行程序ProcMin(A,N,MIN)的作用是返回?cái)?shù)組
12、A中的最小值。請(qǐng)?jiān)跈M線處填寫(xiě)適當(dāng)語(yǔ)句,使程 序完整。SUBROUTINE PROCMIN(A,N,MIN)INTEGER A(N),N,MINMIN=A(1)DO I=2,NIF(A(I)>MIN)MIN=A(I)ENDDOEND14.采用變化的冒泡排序法將N個(gè)數(shù)按從大到小的順序排列:對(duì)N個(gè)數(shù),從第一個(gè)直到第 N個(gè),逐次比較相鄰的兩個(gè)數(shù),大者放前面,小者放后面,這樣得到的第N個(gè)數(shù)是最小的,然后 4個(gè)對(duì)前面N-1個(gè)數(shù),從第N-1個(gè)到第1個(gè),逐次比較相鄰的兩個(gè)數(shù),大者放前面,小者放后面,這樣得到的第1個(gè)數(shù)是最大的。對(duì)余下的N-2個(gè)數(shù)重復(fù)上述過(guò)程,直至按從大到小的順序排列完畢。請(qǐng)?jiān)谙铝谐绦驒M線處填寫(xiě)適當(dāng)語(yǔ)句, 使程序完整。PARAMETER(N=10)INTEGER X(N),I,J,TX=(/10,55,25,70,45,15,25,85,45,35/)WRITE(*,10)(X(l),l=1,10)DO I=1,N-1DO J= 2,N-I+1IF(_A(J-1)<A(J) THENT=X(J-1)X(J-1)=X(J)X(J)=TEND IFEND DOENDDOWRITE(*,10)(X(l),l=1,10)10 FORMAT(1X,10I4)END
溫馨提示
- 1. 本站所有資源如無(wú)特殊說(shuō)明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁(yè)內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒(méi)有圖紙預(yù)覽就沒(méi)有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫(kù)網(wǎng)僅提供信息存儲(chǔ)空間,僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。
最新文檔
- 廣東省江門(mén)市重點(diǎn)中學(xué)2025屆高考數(shù)學(xué)三模試卷含解析
- 河南省商丘名校2025屆高三3月份模擬考試英語(yǔ)試題含解析
- 山東省沂水縣2025屆高三適應(yīng)性調(diào)研考試英語(yǔ)試題含解析
- 深圳高級(jí)中學(xué)2025屆高三第三次模擬考試英語(yǔ)試卷含解析
- 現(xiàn)代學(xué)徒制課題:現(xiàn)場(chǎng)工程師專(zhuān)項(xiàng)培養(yǎng)計(jì)劃政策保障研究(附:研究思路模板、可修改技術(shù)路線圖)
- 四川省峨眉第二中學(xué)2025屆高三第四次模擬考試英語(yǔ)試卷含解析
- 新疆石河子高級(jí)中學(xué)2025屆高考數(shù)學(xué)倒計(jì)時(shí)模擬卷含解析
- 陜西省西安高中2025屆高三沖刺模擬數(shù)學(xué)試卷含解析
- 廣東省佛山市普通高中2025屆高三壓軸卷英語(yǔ)試卷含解析
- 2025屆云南省曲靖市西南名校高三第六次模擬考試數(shù)學(xué)試卷含解析
- 結(jié)核病的診斷流程圖解
- 餐飲公司股權(quán)合同模板
- 工程力學(xué)知到智慧樹(shù)章節(jié)測(cè)試課后答案2024年秋湖南工學(xué)院
- 廣東省廣州市越秀區(qū)2023-2024學(xué)年八年級(jí)上學(xué)期期末道德與法治試題(含答案)
- 第七屆重慶市青少年科學(xué)素養(yǎng)大賽考試題庫(kù)(含答案)
- 地理2024-2025學(xué)年人教版七年級(jí)上冊(cè)地理知識(shí)點(diǎn)
- 美容學(xué)徒帶薪合同范例
- 醫(yī)療機(jī)構(gòu)從業(yè)人員行為規(guī)范培訓(xùn)
- 2024年人教部編版語(yǔ)文小學(xué)四年級(jí)上冊(cè)復(fù)習(xí)計(jì)劃及全冊(cè)單元復(fù)習(xí)課教案
- 四大名著之西游記經(jīng)典解讀28
- 2024年城市園林苗木移植合同范例
評(píng)論
0/150
提交評(píng)論