问题
单项选择题
下面程序段的运行结果是()。
DATA L,M,N/1,10,4/
CALL FAC(L,M)
PRINT *,L,M,N
N=20
M=25
CALL FAC(L,M)
PRINT *,L,M,N
END
SUBROUTINE FAC(K,M)
N=0
DO 1 J=1,N
K=K*J,
N=N+1
1 CONTINUE
END
A.1 20 4
20 25 20
B.1 4 10
20 25 20
C.1 10 4
25 25 25
D.1 10 4
1 25 20
答案
参考答案:D
解析:
子程序中循环终值为0,因此循环一次都不执行。