阅读下列FORTRAN 程序: N=0 DO K=1,3 N=N+K ENDDO PRINT*,N,K END 执行上述程序后,输出的结果为: 。 [A] 3 3 [B] 3 4 [C] 6 3 [D] 6 4
A.错误
B.错误
C.错误
D.正确
- · 有4位网友选择 A,占比44.44%
- · 有2位网友选择 B,占比22.22%
- · 有2位网友选择 C,占比22.22%
- · 有1位网友选择 D,占比11.11%
A.错误
B.错误
C.错误
D.正确
阅读下列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
阅读下列FORTRAN程序: DO I=1,5 SUM=SUM+I ENDDO WRITE(*,*) SUM END 上述程序运行后,输出结果是()。
A.15
B.15.0
C.不确定
D.0
阅读下列FORTRAN程序: DO 20 K=2,5,2 S=1.0 DO 10 J=K,5 10 S=S+J 20 CONTINUE* WRITE(*,*) S END 执行上述程序后,输出的S值为()。
A.9.0
B.1.0
C.24.0
D.10.0
阅读下列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程序: 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!
阅读下列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程序: X=1.0 Y=2.0 CALL SUB(X,Y,Z,3.0) WRITE(*,100) X,Y,Z 100 FORMAT(1X,13.1) END SUBROUTINE SUB(A,B,X,Z) A=A+1 B=B+2 Y=1.0 X=Y+Z END 执行上述程序后,输出的结果为()。
A.2.0 5.0 4.0
B.4.0 1.0 2.0
C.4.0 2.0 4.0
D.2.0 4.0 4.0
A.不正确
B.正确
C.不正确
D.不正确
阅读下列FORTRAN程序: REAL A(5) COMMON /CC/X DATA A/1,2,3,4,5/ X=0 Y=FUN(A,5) +FUN(A,5) WRITE(*,*) Y END FUNCTION FUN(A,N) REAL A(N) COMMON /CC/X X=X+1 F=1 DO 10 I=N,1 F=F+A(I) 10 CONTINUE FUN=F+X END 上述程序执行后,输出结果是()。
A.4.0
B.5.0
C.16.0
D.33.0
为了保护您的账号安全,请在“简答题”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!