(18) 以下关于FORTRAN77源程序书写格式的叙述中正确的是
A) 程序行的第1列为注释标志区，不能用作标号
B) 程序行的7-72列为语句区
C) 利用续行标志，一条语句可以继续任意多行
D) 只要以字母C或字符*起头，就是注释区
(19) 阅读下列FORTRAN77程序：
S=1.0
DO 10 K=2,4,2
10 S=S+1/K
WRITE(*,*)S
END
执行上述程序后,输出的S值为
A) 0.75 B) 1.75 C) 0.0 D) 1.0
(20) 下列标识符中不能作为FORTRAN77的合法变量名的是
A) A_1 B) A1 C) A1A D) A+1
(21) 设A=3.0,C=6.0,L=.FALSE.,则下列FORTRAN77表达式中值为.FALSE.的是
A) A.NE.C.AND..NOT.L B) A.NE.C.NEQV..NOT.L
C) A.NE.C.EQV..NOT.L D) A.NE.C.OR..NOT.L
(22) ½²sin²(½)的FORTRAN77表达式正确的写法是
A) 0.5*SIN(1/2)**2 B)SIN(0.5)**2/2
C) 0.5(SIN(1/2))**2 D)(SIN**2)(1/2)/2
(23) 不等式0A) 0.0.LE.Y.LE.1.0 B) 0.0.LE.Y.OR.Y.LE.1.0
C) 0.0.LE.Y.AND.Y.LE.1.0 D) 0.0.LE.Y.NOT.Y.GT.1.0
(24) 下列各组说明语句中正确的是
A) REAL R B) PARAMETER(R=10)
IMPLICITINTEGER(I-T) INTEGER R
C) REAL R D) IMPLICITINTEGER(I-N)
PARAMETER(R=10) REAL R=10
(25) 下列DATA语句中正确的是
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.0/
(26) 设M=2000,为了在屏幕上输出
□□***2000*** (其中□表示空格):
则应使用的格式输出语句为
A) WRITE(*,10)M
10 FORMAT(2X,’***’,I4,’***’)
B) WRITE(*,10)
10 FORMAT(3X,’***M***’)
C) WRITE(*,10)
10 FORMAT(3X,’***2000***’)
D) WRITE(*,10)M
10 FORMAT(1X,’2X’,17,’***’)
(27) 若有格式输入语句如下:
INTEGER A(4)
READ(*,2O)A
20 FORMAT(4I2)
如果在执行时从键盘输入
□1□23□456□789↙ (其中□为空格, ↙为回车键)
则读入后的A(3)值为
A) 56 B) 456 C) 34 D) 30
(28) 下列不是FORTRAN77赋值语句的是
A) X=.TRUE. B) X=X*X C) X=X**2**2 D) X=X++
(29) 阅读下列FORTRAN77程序:
READ(*,10)A,B,C
10 FORMAT(1X,F3.1,2X,2F3.2)
WRITE(*,*)B
END
如果在执行该程序时从键盘输入
1234567890↙ (其中↙为回车键)
则运行后输出的B值为
A) 7.89 B) 6.78 C) 4.56 D) 0.67
(30) 阅读下列FORTRAN77程序:
READ(*,*)A
B=0.0
IF(A.GE.1.0)B=B+2.0
IF(A.GE.2.0)B=B-1.0
WRITE(*,*)B
END
在执行时,从键盘输入
5.0↙ (其中↙为回车键)
则输出的B值为
A) 2.0 B) -1.0 C) 0.0 D) 1.0
(31) 阅读下列FORTRAN77程序:
PARAMETER(A=1.0)
READ(*,*)B
IF(B.LT.A)THEN
B=A
ELSE IF(B.GT.A)THEN
B=B-A
IF(B.GT.A)THEN
B=B-A
ENDIF
ELSE
B=0.0
ENDIF
WRITE(*,*)B
END
在执行时,从键盘输入
2.5↙ (其中↙为回车键)
则输出的B 值为
A) 1.0 B) 2.5 C) 1.5 D) 0.5
(32) 设分段函数如下:
1 X>1
y= X 0 -X X≤0
实现上述函数功能的FORTRAN77程序段为
A) IF(X.GT.1.0)Y=1.0
IF(X.GT.0.0)Y=X
IF(X.LE.0.0)Y=-X
B) IF(X.GT.0.0)Y=X
IF(X.LE.0.0)Y=-X
IF(X.GT.1.0)Y=1.0
C) IF(X.LE.0.0)Y=-X
IF(X.GT.1.0)Y=1.0
IF(X.GT.0.0)Y=X
D) IF(X.GT.1.0)Y=1.0
IF(X.LE.0.0)Y=-X
IF(X.GT.0.0)Y=X
(33) 下列各程序中正确的是
A) DO 10 N=1， 100
<循环体>
10 GOTO 100
B) DO 10 N=1，100
<循环体>
10 END
C) DO 10 N=1，100
<循环体>
10 STOP
D) DO 10 N=1，100
<循环体>
10 IF(N.GT.10)M=N-10
(34) 阅读下列FORTRAN77程序：
DO 10 I=4，2，-1
A=1.0
DO 20 J=I，4，2
A=A+1.0
20 CONTINUE
10 CONTINUE
WRITE(*，*)A
END
运行上述程序后，输出的A值为
A) 5.0 B) 4.0 C) 3.0 D) 2.0
(35) 下列循环中不正确的是
A) DO 10 I=1，200，100
M=I
DO 10N=M，10
<循环体> |
