FORTRAN知識要點及筆試試卷分析

1、FORTRAN 知識要點,第2章FORTRAN90基礎(chǔ)知識：程序單元的概念、語言元素、數(shù)據(jù)類型、變量名的命名規(guī)則 第3章基本語句：類型說明語句、種別、p38頁屬性表、算術(shù)表達式、P40頁函數(shù)表、輸入輸出（表控格式、有格式I,F）,第4章選擇結(jié)構(gòu)程序設(shè)計：關(guān)系與邏輯表達式（關(guān)系運算符=與/=）（邏輯運算符P61）、混合運算符的優(yōu)先級別（P62表4-2）、IF語句與IF結(jié)構(gòu)的區(qū)別、CASE結(jié)構(gòu),第5章循環(huán)結(jié)構(gòu)程序設(shè)計：三種循環(huán)結(jié)構(gòu)：不帶循環(huán)變量的DO、帶循環(huán)變量的DO、DO While結(jié)構(gòu)、隱DO循環(huán)、P80頁EXIT和CYCLE語句,第6章程序單元和過程：函數(shù)子程序、子例子程序、接口塊（P116

2、必須使用接口塊的情況）、虛實結(jié)合、虛過程、模塊、遞歸、P136頁其他部分（內(nèi)部過程、類屬過程、超載運算符、自定義運算符、超載賦值號） P142：進行超載賦值運算時，必須編寫子例子程序形式；要實現(xiàn)超載運算符功能時，必須編成函數(shù)子程序形式。,第7章數(shù)組：數(shù)組的基本概念（P154數(shù)組片段與數(shù)組構(gòu)成器）、二維數(shù)組按列存放、數(shù)組函數(shù)、P165 RESHAPE函數(shù)、數(shù)組形式（常、可調(diào)、假定形狀、動態(tài)、假定大?。?、數(shù)組做變元、P191頁數(shù)組運算,第8章字符型數(shù)據(jù)：字符常量、變量、子串、表達式、P208頁字符函數(shù) 第9章派生類型和指針：派生類型、指針（P229頁注意問題） 第10章數(shù)據(jù)文件：文件P260頁各參

3、數(shù)的含義、文件的操作（上機）,8,2010秋二級FORTRAN 筆試試卷,選擇題(10分）,9,21、 FORTRAN90標準規(guī)定有五個邏輯運算符，以下不屬于規(guī)定但可以自定義的邏輯運算符是 21 。,.NOT. .EQV. .XOR. .NEQV.,10,22、語句CHARACTER(len=15):str說明str是長度為15的字符變量，下述賦值語句中正確的是 22 。,A. str=abcd+26 B. str=I am a / student C. str=2*3+61 D. str=AB,11,23、若有說明語句REAL(4):x=123.4567，則下述表達式能將x的值舍入成123.

4、46的是 23 。,A.(x*100.0+0.5)/100.0 B. (x/100.0+0.5)*100.0 C. (x+0.5)/100.0)*100.0 D. INT(x*100.0+0.5)/100.0,12,24、有程序片斷: INTEGER:a(2,2),b(5)a=RESHAPE(/2,4,6,8/),(/2,2/)b=(/RESHAPE(a,(/4/),9/) 那么數(shù)組b的內(nèi)容是 24 。,A. 2 4 6 8 9 B. 2 2 2 9 C. 4 4 6 8 9 D. 4 4 4 4 9,A數(shù)組的值：2 6 4 8,13,25、關(guān)于動態(tài)數(shù)組（假定數(shù)組名為a）的以下說法中，錯誤的是

5、 25 。,A.要說明標識符a為動態(tài)數(shù)組，必須在數(shù)組說明中標明ALLOCATABLE屬性 B.動態(tài)數(shù)組既可以作過程的啞元，也可以在調(diào)用過程時作實元 C.動態(tài)數(shù)組a用執(zhí)行ALLOCATE(a(10)語句獲得內(nèi)存空間 D.動態(tài)數(shù)組a用執(zhí)行DEALLOCATE(a)語句釋放已占內(nèi)存空間,14,26、含有目標變量和指針變量的程序片斷如下： INTEGER, POINTER:p1,p2INTEGER, TARGET:x=10p1=x以下賦值語句中錯誤的是 26 。,x=2*p1+1 p1=2*x+1 p2=2*p1+1 p1=2*p1+1,15,27、FORTRAN90提供的內(nèi)部函數(shù)其名稱分為通用名（即

6、類屬名）和專用名。以下說法中錯誤的是 27 。,通用名無須考慮其函數(shù)值的類型,它決定于變元的類型，使用方便 專用名必須讓函數(shù)值的類型,和它的變元的類型相一致，否則出錯 在進行過程啞、實結(jié)合時只能用專用名，并用INTRINSIC屬性加以說明 在進行過程啞、實結(jié)合時只能用通用名，并用INTRINSIC屬性加以說明,16,28、函數(shù)或子程序輔程序的啞元是數(shù)組，調(diào)用時實行數(shù)組啞、實結(jié)合。以下說法中錯誤的是 28 。,A實元（實參）可以是同類型的數(shù)組名或數(shù)組元素名 B實元數(shù)組與啞元（形參）數(shù)組必須有相同的維數(shù) C實元數(shù)組（從結(jié)合點開始）的長度不能小于啞元數(shù)組長度 D若實元為數(shù)組名則從該數(shù)組的首元素開始，

7、否則從該數(shù)組元素名指定的元素開始啞、實結(jié)合,17,29、以下關(guān)于內(nèi)部函數(shù)過程說法中正確的是 29 。,內(nèi)部函數(shù)過程可以放在程序單位中的任何地方 內(nèi)部函數(shù)過程必須通過執(zhí)行它的END FUNCTION語句才能完成引用 內(nèi)部函數(shù)過程不能遞歸定義 內(nèi)部函數(shù)過程可以作為函數(shù)引用而出現(xiàn)在該程序單位內(nèi)任何表達式內(nèi),18,30、以下關(guān)于FORTRAN文件系統(tǒng)中操作的敘述中，錯誤的是30 。,A. 執(zhí)行BACKSPACE(UNIT=2,IOSTAT=i)操作，從文件的當(dāng)前位置退至文件始端 B. 執(zhí)行REWIND(UNIT=2,IOSTAT=i)操作，從文件的當(dāng)前位置退至文件始端 C. 執(zhí)行BACKSPACE(U

8、NIT=2,IOSTAT=i)操作，從文件的當(dāng)前位置后退一個記錄 D. 執(zhí)行ENDFILE(UNIT=2,IOSTAT=i)操作，在文件的當(dāng)前位置寫上文件結(jié)束符,19,1、各種運算符及其優(yōu)先級2、數(shù)組的函數(shù)3、程序結(jié)構(gòu)，內(nèi)部函數(shù)問題4、派生類型問題、指針變量5、變量的數(shù)據(jù)類型6、啞元7、文件操作,選擇題注意：,20,填空題（請將答案填寫在答題紙的相應(yīng)答題號內(nèi)，每個答案只占一行）,21,讀程序?qū)懡Y(jié)果(15分） ：1、數(shù)組元素的賦值(各種語句結(jié)構(gòu)的嵌套、函數(shù))2、遞歸程序的調(diào)用3、字符類型與字符子串的使用、字符函數(shù)4、派生類型的定義與使用5、自定義運算符或運算符超載6、類屬過程、模塊、內(nèi)部過程7、

9、指針賦值8、數(shù)組函數(shù)、程序的功能,保證正確的方法：逐語句運行、畫圖表！,22,RECURSIVE FUNCTION f(a,b) RESULT(s) IMPLICIT NONE INTEGER:a,b,s IF(b=1) THEN s=a ELSE s=a+f(a,b-1) ENDIF PRINT*,a,b END FUNCTION f,例1：填空題2、 以下程序執(zhí)行后，輸出的第一行是 ，主程序中函數(shù)f(x,y)的值是 。遞歸問題,PROGRAM main IMPLICIT NONE INTEGER:x,y,f x=5; y=3 PRINT*,f(x,y) END PROGRAM main,5

10、 1,15,23,PROGRAM pointerIMPLICIT NONEINTEGER,POINTER:a,b,cINTEGER,TARGET:x,y,zx=33; y=55; z=88a=x; b=y; c=zPRINT(3I5),a,b,ca=b+c;b=c+a; c=a+bPRINT(3I5),a,b,c a=b; b=c; c=aPRINT(3I5),a,b,cEND PROGRAM pointer,例2：填空題4、以下程序執(zhí)行后，輸出的第二行是 ，第三行是 。指針問題,143 231 374,231 374 231,24,PROGRAM main IMPLICIT NONE INT

11、EGER:i,n,maxl(1),array(3,3) INTEGER, ALLOCATABLE : ar1(:) array=RESHAPE(/7,9,-1,-2,5,0,3,6,9/),(/3,3/) n=SIZE(SHAPE(array) PRINT (A,I2),n=,n ALLOCATE(ar1(n) ar1=MAXLOC(array,MASK=array .LT. 7) PRINT (4I3),(ar1(i),i=1,n) END PROGRAM main,例3：填空題5、以下程序執(zhí)行后，輸出的第一行是 ，第二行是 。數(shù)組函數(shù),n=2,2 3,Array的值： 7 -2 3 5 6

12、 -1 0 9,程序填空(15分）：1、變量類型的說明、初值；2、條件表達式的構(gòu)造；3、循環(huán)的出口語句；4、派生類型的定義；5、函數(shù)或子例子程序的調(diào)用,模塊引用；5、表達式的書寫；7、mod與整數(shù)相除的搭配使用。,保證正確的方法：弄清每個變量的含義，逐語句對照算法的中文描述！,26,FORTRAN 上機考試的得分點,(1)改錯題：20分 源程序存在： 2分 錄入完畢： 2分 結(jié)果文件存在： 2分 結(jié)果正確： 2分 改正錯誤： 4分3錯=12分 （其中語法錯1處，語義錯2處） 注意：結(jié)果文件MYF1.OUT文件。,27,(2)編程題：20分,源程序存在： 2分 數(shù)據(jù)文件存在： 1分 數(shù)據(jù)文件正確

13、： 2分 結(jié)果文件存在： 2分 結(jié)果文件正確： 2分 主輔結(jié)構(gòu)正確： 2分 OPEN語句正確： 1分 讀/寫語句正確： 1分 循環(huán)語句正確： 1分 調(diào)用子程序正確： 1分 虛實結(jié)合： 2分 算法正確： 3分,二、編程題（20分） 【題目】函數(shù)f(x)的展開式如下：,將f(x)展開式的右端編寫成外部過程。當(dāng)級數(shù)通項的絕對值小于eps（eps=10-10，即1E-10）時停止計算。在同一行上，x用F6.4格式輸出，計算所得的f(x)和 用F8.6格式輸出。計算所用的數(shù)據(jù)存放在文件MYF2.DAT中，從該文件輸入的x值為： 5.5887， 1.5708, 2.7635， 3.2536, 3.8633

14、， 4.3256, 4.4988,事實上,若通項記為Un,則,【要求】 1. 源程序必須存放在文件MYF2.F90中。 2. 建立數(shù)據(jù)文件MYF2.DAT，所需輸入數(shù)據(jù)即從該文件中讀出。 3. 程序運行結(jié)果存于文件MYF2.OUT中。 4. 數(shù)據(jù)文件的打開、使用、關(guān)閉均要求采用FORTRAN語言文件管理語句實現(xiàn)。 【注意】本題完成后必須將MYF2.F90、MYF2.DAT、MYF2.OUT等文件拷貝到考試盤（盤符為T:）的根目錄(不要自己創(chuàng)建文件夾)下供閱卷用。,PROGRAM Main IMPLICIT NONE REAL:x,f,y,z INTEGER:i character(len=50):fmt fmt=(x=,F6.4, f(x)=,F8.6, g(x)=,F8.6) OPEN(1,FILE=myf2.dat) OPEN(2,FILE=myf2.out) DO i=1,7 READ(1,*)x y=f(x) z=1.0/SQRT(1+x*2) WRITE(2,fmt)x,y,z; WRITE(*,fmt)x,y,z ENDDO END PROGRAM Main,FUNCTION f(x) R