有关上述程序的输出结果,正确的判断是()。
A.p[3]引用格式有误,不能输出
B. 输出值不定
C. 输出C
D. 输出D
- · 有4位网友选择 B,占比44.44%
- · 有4位网友选择 C,占比44.44%
- · 有1位网友选择 D,占比11.11%
A.p[3]引用格式有误,不能输出
B. 输出值不定
C. 输出C
D. 输出D
阅读下列FORTRAN77程序:
READ(* , *)X
IF(X.LE.0) THEN
Y=0.0
ELSE IF ((X.LT.5.0).AND.(X.NE.2.0)) THEN
Y= 1/X
ELSE IF (X.LE.10.0) THEN
Y=1/(X+2)
ELSE
Y = 10.0
END IF
WRITE(* , *)Y
END
上述程序运行时,由键盘输入2,则输出的结果为()。
A.0.5
B.0.25
C.10.0
D.0.0
A.错误
B.错误
C.错误
D.正确
A.0
B. 3
C. 2
D. 4
A.6.00 6.00 9.00
B.4.00 7.00 11.00
C.8.00 7.00 9.00
D.2.00 6.00 8.00
阅读下列FORTRAN程序: READ(*,*)SCARE IF(SCARE.GE.85.0)WRITE(*,*)‘Very Good!’ IF(SCARE.GE.75.0)WRITE(*,*)‘Good!’ IF(SCARE.GE.60.0)WRITE(*,*)‘Pass!’ IF(SCARE.LT.60.0)WRITE(*,*)‘Pass!’ 在执行上述程序时,如果从键盘输入: 75.0↙ 则运行后输出结果为()。
A.GOOd!
B.Pass!
C.Good Pass!
D.Very GOOd Pass!
A.程序出现异常
B.2
C.1
D.没有输出结果
阅读下列凹RTl(AN77程序:
COMMONK,M,N,L
K=4
M=5
CALLAAA
WRITE(*,100)K,M,N
100FORMAT(1X,12)
END
SUBR()UTINEAAA
COMMONJ,K,M,N
J=J+K
M=JxK
N=J+M
END
运行上述程序后,输出的结果为()。
(A) 4
5
29
(B) 4
5
20
(C) 9
5
45
(D) 9
5
29
A.不正确
B.正确
C.不正确
D.不正确
阅读下列FORTRAN77程序:
EXTERNALPP
INTEGER P,PP,Q(4,4)
DATAQ/1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16/
WRITE(*,*)P(Q,4,PP)
END
INTEGER FUNCTION PP(B,N)
INTEGERB(N,N)
PP=0
D010K=1,N
10PP=PP+B(K,K)
END
INTEGER FUNCTIONP(B,N,S)
INTEGER S,B(N,N)
P=0
D()10K=1,N
10P=P+S(B,K)
END
运行上述程序后,输出的结果为()。
(A) 55
(B) 56
(C) 57
(D) 58
为了保护您的账号安全,请在“简答题”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!