发布时间 : 星期日 文章Fortran模拟试卷1-8更新完毕开始阅读689aef09844769eae009ed4a
ENDDO
END SUBROUTINE Who_is_King
PROGRAM Main
IMPLICIT NONE
INTEGER(1),DIMENSION(22) :: monkey INTEGER(1) :: i,total=22,space=5,Last OPEN(2,FILE=?myf1.out?)
CALL Who_is_King(monkey,total,space,Last)
WRITE(*,FMT=?(1X,”Monkey King is No:”,I3)?) Last WRITE(2,FMT=?(1X,”Monkey King is No:”,I3)?) Last END PROGRAM Main
【要求】1.必须将上述源程序录入到文件myf1.f90中，然后根据题目的要求以及程序中语句的逻
辑关系改正程序中的错误。
2.改错时除增加说明语句和调换语句顺序外，不允许增加和删除任何语句。 3.改正后程序和运行结果分别用myf1.f90和myf1.out为文件名存入考试盘。
【注意】本题完成后必须将myf1.f90、myf1.out和myf1.exe拷贝到考试盘中。
2nx22?(2n?1)!!xf(x)?1??x?? 【题目】幂级数定义的一元函数： 2(2n?2)!!2n?1，其中│x│≤ 1 n?1
事实上，f(x)=xarcsinx+ 将级数求和编写成外部函数。当通项绝对值小于ε=1E-121?x2。
时停止计算。在同一行上，x用F7.4，级数之和及xarcsinx+ 1?x2用F10.6格式输出。程序中无需比较两函数值是否相等。用于验证的数据存放在文件myf2.dat中，从该文件中输入的x为： 0.5887,0.6852,0.7874,0.9988,-0.7874,-0.6852,-0.5887 注意，这里: (2n-1)!!=1×3×5×7×9×??×(2n-1), (2n+2)!!=2×4×6×8×10×??×(2n+2)
222?x，则有 (2n?1)x 提示：若级数的求和部分写成 U1??Un， Un?1?Un?24(2n?1)(2n?2)n?1
【要求】1.源程序必须存放在文件myf2.f90中。
2.建立数据文件myf2.dat，所需输入数据即从该文件中读出。 3.程序运行结果存于文件myf2.out中。
3.数据文件的打开、使用、关闭均要求采用FORTRAN语言文件管理语句实现。
【注意】本题完成后必须将myf2.f90、myf2.dat、myf2.out和myf2.exe拷贝到考试盘中。
二、编程题
49
FORTRAN90模拟测验七（笔试部分）
一．选择题（从4个可选答案中选择一个正确答案添入空白处）
1．指出下列符号中，合法的FORTRAN90变量名是 。 ①shanghai ②gh3.5 ③sum 1 ④#3r ⑤abc3d ⑥32 ⑦A m ⑧a-1 A. ①②③④ B．⑤⑥⑦⑧ C. ①③⑤⑦ D．②④⑥⑧ 2．以下关键字中，属于描述属性的是 。
①REAL ②DIMENSION ③INTEGER ④POINTER ⑤READ ⑥PARAMETER ⑦END ⑧EXTERNAL A. ①②③④ B．⑤⑥⑦⑧ C. ①③⑤⑦ D．②④⑥⑧
3． 以下值为-4的表达式是 。 A. MOD(-17，5)+NINT(-1.8) B. MOD(17,-5)+NINT(-1.8) C．MOD(-17，5)+NINT(-2.8) D. MOD(17,-5)+NINT(-2.8) 4．关于数组说明语句REAL，DIMENSION(：，：)，ALLOCATABLE：：a，b，c以下叙述中，不正确的是 。
A．指明a、b、c为假定形状数组 B．指明a、b、c为动态数组 C. a、b、c可以充作函数或子程序的哑元 D．指明a、b、c为二维数组
5．表达式10／4／2.0的值是 。 A，整数1 B．实数1．0 C．实数1．25 D．实数L 3
6．自定义数组stl的定义如下： TYPE student INTEGER：：num
CHARACTER(len=8)：：name ． LOGICAL：：sex INTEGER：：birthday ENDTYPE
TYPE(student)，DIMENSION(10)：：stl
则数组stl在常用的编译系统(如DVF)中占据内存单元字节数是 。 A．140 B．160 C．180 D．200 7. 设有程序片段： CHARACTER(len=10) ：：a=?abcdefghij? CHARACTER(1en=5) ：：c
C=a(:5)； a(:5)=a(3:7)； a(3:7)=c PRINT *，a 执行后，输出结果是 。
A．cdabcdehij B．jfghiabcde C．fghiiabcde D．abcdefghij
8. 下列程序片段执行后，输出的结果是 。 n=0
DO k=5，1，-1 m=0
DO j=k，5
n=k+j; m=m+k*j+n ENDDO ENDDO
PRINT *，m
A． 33 B． 34 C．35 D．36
9．外部过程的哑元表中有假定形状数组a，下面说法中正确的是 。 A．必须在主调程序中的某个模块中加以说明 B．必须在主调程序的接口块中加以说明 C. 只需在主调程序中作一般说明 D．不必在主调程序的接口块中加以说明
50