阅读下列FORTRAN程序:S(X)=2*X*X-Y+1.0DATAA,B,Y/3*2.0/P=S(A)*S(B-A)4-S(Y)-S(B)WRITE(*,*) PEN
阅读下列FORTRAN程序: S(X)=2*X*X-Y+1.0 DATA A,B,Y/3*2.0/ P=S(A)*S(B-A)4-S(Y)-S(B) WRITE(*,*) P END 上述程序运行后,输出的P值为()。
A.9.0
B.-9.0
C.7.0
D.-7.0
阅读下列FORTRAN程序: S(X)=2*X*X-Y+1.0 DATA A,B,Y/3*2.0/ P=S(A)*S(B-A)4-S(Y)-S(B) WRITE(*,*) P END 上述程序运行后,输出的P值为()。
A.9.0
B.-9.0
C.7.0
D.-7.0
阅读下列FORTRAN程序:
INTEGER X(7)
DATA X/4,5,7,8,l0,12,11/
D0 10 K=1。7
IF(MOD(X(K),2).NE.O)THEN‘
S—S+X(K)
N=N+1
END IF
10 CONTINUE
T—S/N
WRITE(*,20)S,T
20 FORMAT(20X,3F6.1)
END
程序运行后的输出结果是():
A.23.0 7.7
B.47.0 6.7
C.34.0 8.5
D.57.0 11.4
阅读下列FORTRAN程序: CHARACTER A*5 A='ABCDE' CALL S(A) END SUBROUTINE S(X) CHARACTER X*3 WRITE(*,*)X END 执行上述程序后,输出的X值为()。
A.'AB
B.DE'
C.CDE
D.ABC
阅读下列FORTRAN程序: S=1.0 DO 100 K=3,1,-1 DO 100 N=-1,-3 100 S=2*S WRITE(*,*) S END 运行上述程序后,输出的S值为()。
A.1.0
B.8.0
C.512.0
D.4.0
阅读下列FORTRAN程序:
DIMENSIONA(3)
DATAA/3.0,2.0,1.0/
X=F(A)
WRITE(*,100)X
100FORMAT(1X,F3.1)
END
FUNCTIONF(B)
DIMENSIONA(3),B(3)
DO10I=1,3
10A(1)=B(1)-I
F=A(1)+A(2)+A(3)
X=1.0-F
END
执行上述程序后,输出的X值为()。
(A) 1.0
(B) 0.0
(C) 6.0
(D) -5.0
阅读下列FORTRAN程序: INTEGER S(2,4) ,A(2) DATA S/4*1,4*2/ CALL SUB(S,2,4,A) M=A(1) -A(2) WRITE(*,*) M END SUBROUTINE SUB(S,N,K,A) INTEGER S(N,K),A(N) DO 20 I=1,N A(I)=0 DO 10 J=1,K 10 A(I)=A(I)+S(I,J) A(I)=A(I)/K 20 CONTINUE END 执行上述程序后,输出的M值为()。
A.0
B.1
C.2
D.3
阅读下列FORTRAN程序: DIMENSION A(6) READ(*,*)(A(I),I=1,6) DO 10 K=1,3 S=A(K) A(K)=A(7-K) A(7-K)=S 10 CONTINUE WRITE(*,20)(A(I),I=1,6) 20 FORMAT(1X,2I) END 上述程序运行时,若由键盘输入1,2,3, 4,5,6,则输出的结果为()。
A.1 2 3 4 5 6
B.1 4 2 5 3 6
C.6 5 4 3 2 1
D.6 3 5 2 4 1
阅读下列FORTRAN程序
INTEGERX(3,3),A
DATA X/1,2,3,4,5,6,7,8,9/
DO 10 I=1,3
DO 10 J=I+1,3
A=X(I,J)
X(I,J)=x(J,I)
X(J,I)=A
10 CONTINUE
20 WRITE(*,20)((X(I,J),J:l=3),I=1,3)
20 FORMAT(1X,3I2)
END
运行上述程序后,其输出是()。
(A) 1 4 7
2 5 8
3 6 9
(B) 1 2 3
4 5 6
7 8 9
(C) 9 6 1
8 5 2
7 4 3
(D) 9 8 7
6 5 4
3 2 1
阅读FORTRAN程序:
READ(*,*)N
D0 10 K=1,N
S=S+K**2
10 CONTINUE
WRITE(*,l00)S
100 FORMAT(2X,F8.O)
END
键盘输入5则程序运行后的输出结果是()。
A.35
B.45
C.65
D.55
A.1 4 72 5 83 6 9
B.1 2 34 5 67 8 9
C.9 6 18 5 27 4 3
D.9 8 76 5 43 2 1
阅读下列FORTRAN程序:
S=1.0
D010K=2,4,2
10S=S+1.0/K
WRITE(*,*)S
END
执行上述程序后,输出的S值为()。
(A)0.75
(B)1.75
(C)0.0
(D)1.0
为了保护您的账号安全,请在“简答题”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!