《高级语言程序设计（FORTRAN）》 考试样题

《高级语言程序设计（FORTRAN）》考试样题

一、选择题（每小题2分，共40分）

1.卜列标识符中不能作为FORTRAN的合法变量名的是___D__

A）A」B）AlC）A1AD）A+l

2.在FORTRAN的变量类型说明语句中没有B

A）REAL语句B）CIIAR语句C）INTEGER语句D）1.OGICA1.语句

3.F0RTRAY90源程序的扩展名是C。

A.TXTB.FC.F90D.FOR

4.下列关于符号常量的说法正确的是__C__。

A.符号常量的定义应该放在所有语句之前

B.符号常量不可以是字符型常量

C.在•个程序单位中定义•个符号常量后，不能再改变它的值

D.符号常量定义语句与赋值语句一样，是可执行语句

5、在下列写法中，D______不是FCRTRAN常量。

A..TRUE.B.IE-2C.(0.0,2.4)D.1,000,000

6.表达式15/4/2.0的值是Bo

A.整数2B.实数1.5C.实数2.25D.实数1.3

7.下列不是FORTRAN赋值语句的是__I)______。

A)X=.TRUE.B)X=X*XC)X=X**2**2D)X=X++

8.用形的上底为A,下底为B,高为H,计算其面积的FORTRAN表达式中错误的是A。

A)1/2*(AB)*HB)(A+B)*H/2C)(A+B)/2*HD)0.5*(A+B)*H

9.要选拔身高T>1.7米且体重W<62.5公斤的人,FORTRAN的逻辑表达式是_C_

A)T.ce.1.7.AND.w.1e.62.5B)T.Ie.1.7.OR.w.ge.62.5

C)T.gt.1.7.AND.w.11.62.5D)T.gt.1.7.OR.w.11.62.5

10.FORTRAN90规定，变量类型声明的优先顺序是C。

A.隐含约定（I-N规则）＞IMPLICIT声明、类型声明

B.类型声明、隐含约定（17规则）,IMPLICIT声明

C.类型声明、IMPLICIT声明、隐含约定（I-N规则）

D.IMPLICIT声明、类型声明、隐含约定（I-N规则）

11、假设CH是一个字符型变量，并且具有足够的长度，则对于CH（3:7）,下面说法正确的是_D

A.它是一个数组片段B.它是一个数组定义形式

C它是CH的一个子串，并且长度是4D.它足CH的一个子串，并且长度是5

12.数组声明语句为：

INTEGER,DIMENSION(-5：-1,-3:3,11:15)::A

数组共有A个元素。

A.175B.150C.120D.17

13.下列DATA语句中正确的是_Co

A)DATA/A,B/-1.0,-1.0/3)DATAA,B/2*(-1.0)/

C)DATAA,B/2*-1.0/D)DAT/\A/-1.0,B/-1.0

14.下列有关FORTRAN数组的说法正确的是D_____。

A）数组定义语句只能定义一维或二维数组

B）数组元素卜标不能出现负值

0在赋值语句中出现的A（3）肯定是数组元素

D）程序中使用的数组必须进行说明

1

15.一个完整的FORTRAN源程序的组成不应该____D

A)只有一个主程序没有子程序B）有一个主程序和若干子程序

C)有一个主程序和•个子程序D）只有「程序而没有主程序

16.阅读下列FORTRAN程序:

DOK=2,4,2

S=S+1K

ENDDO

WRITE(*,*)S

END

执行上述程序后,输出的S值为C

A)0,75B)1.7500.0D)1.0

17.阅读下列程序

INTEGERM(3,3)

DATAM/1,2,3,4,5,6,7,8,9/

WRITE(*,10)(M(3,J),J=L3)

10FORMAT(1X,3I2)

END

程序运行结果是______Bo

A)258B)3690456D)789

18.阅读下列程序

K(X,Y)=X/Y+X

A=-2.0

B=4.0

B=1.0+K(A,B)

WRITE(*,10)B

10FORMAT(1X,F4.1)

EXD

程序运行结果是A

A)-..OB)1.0B)2.0D)3.0

19.阅读下列FORTRAN程序：

DO1=4,2,-1

A=1.0

2

DOJ=I,4,2

A=A+1.0

EXDDO

ENDDO

WRITE(*.*)A

END

运行上述程序后，输出的A值为C________。

A)5.0B)4.0C)3.0D)2.0

20、可调数组B中出现。

A.只能在主程序B.只能在子程序

C.只能在主程序和子程序D.可以在主程序、子程序和模块

二、填空题(每空2分，共36分)

1、结构化程序设计的三种基本结构为：顺序结构、选择结构和循环结构

2

2、已知A、B、C都是整型变量，且A=3,R=4,C=5,计算表达式C/2>2.AND.A+B==€的值为:.FALSE.

3、将数学表达式e5f+lnSin2x-Sinx2|写成正确的FORTRAN表达式为：

EXPO.14/2*X)+L0G(ABS(SIN(X)**2-SIN(X**2)))。

4、N是一个个位不等于0的两位自然数，写一个表达式将N的个位数与十位数互换，得到一个新的数,

MODiN,10)*10+N/10.

5、已知I是整型变量，当IX)结构从“正常出口”结束时，语句“DO1=3,15,2”共计完成了7_

次循环。

6、下列程序的运行显示结果是什么.TURE.o

LOGICALP

INTEGERI,II,12,13

P=.FALSE.

1=123

I1=MOD(I,10)

I2=M0D(I/10,10)

13=1/100

IF(11+13.EQ.2*12)P=TRUE.

PRINT*,P

END

7.下列程序的运行显示结果是什么K=6o

K=0

DON=21,10,-1

IF(MOD(N,2)==0)K=K+1

ENDDO

PRINT*,"K=",K

END

8.下列程序的运行显示结果是什么145。

M=0

DOJ=l,4

DOK=J-1,4

M=M+1

ENDDO

3

ENDDO

WRITE(*,*)M,J

END

9.下列程序的运行显示结果是什么5167.0

SUM=1.0

J=1

DOVHILE(J.LE.3)

F=1

DO1=2,2*J+1

F=F*I

ENDDO

SUM=SUM+F

J=J+1

ENDDO

3

PRINT*,SUM

EXD

10,下列程序的运行显示结果是什么S=15.00。

DIMENSIONX(3,3)

DATAX/1,2,3,4,5,6,7,8,9/

S=0

DO1=1,3

S=S+X(I,4-I)

EXDDO

WRITE(*,20)S

20FORMAT(IX,*S=',F6.2)

END

11.下列程序将一个数组的元素逆序重新存放，例如存放顺序为：8,6,5,4,1e要求改为：1,4,5,6,8。请在横线

处填写适当语句，使程序完整。

INTEGER,PARAMETER::N=5

INTEGERA(N),I,T

DATAA/8,6,5,4,1/

WITE(*,10)(A(I),1=1,5)

DO1=1,N/2

7=A(I)

A(I)=A(N-I+1)

F(节---------

ENDDO

WRITER10)(A(I),1=1,5)

10FORMAT(IX,514)

ENC

12.下列程序完成按以下格式打印杨辉三角形的前N行：

1

1

1

1

1

14

请在横线处填写适当语句，使程序完整。

PARAMETER(N=10)

INTEGERA(N,N),I,J

DO1=1,N

A(1,1)=1

Ati,1)=1

ENDDO

DO1=3,N

DOJ=2,1-1

Aa,J)=A(I-l,J)+A(I-l,J-l)

ENDDO

ENDDO

DO1=1,N

WRITER1O)(A(I,J),J=1,1)

ENDDO

10FORMAT(IX,1015)

ENE

13.下列子例行程序ProcMin(A,N,MIN)的作用是返回数组A中的最小值。请在横线处填写适当语句，使程

序完整。

SUBROUTINEPROCMIN(A,N,MIN)

INTEGERA(N),Y,MIN

MIN=A(1)

DO1=2,N

IF(A(I)>M1N)MIN=A(I)

ENDDO

END

14.采用变化的冒泡排序法将N个数按从大到小的顺序排列：对X个数，从第一个直到第N个，逐次比较

相邻的两个数，大者放前面，小者放后面，这样得到的第X个数是最小的，然后4个对前面N-1个数，

从第X-1个到第I个，逐次比较相邻的两个数，大者放前面，小者放后面，这样得到的第1个数是最大的。

对余卜.的N-2个数乖复上述过程，直至按从大到小的顺序排列完毕。请在卜列程序横线处填写适当语句，

使