请输入或粘贴题目内容
搜题
拍照、语音搜题，请扫码下载APP
题目内容
（请给出正确答案）
阅读下列FORTRAN77程序： PARAMETER(L=3) INTEGER N(L) DATA N/3*0/ DO 20 I=1，L DO 20 J=1，L N(J)=N(I)+l 20 CONTINUE WRITE(*，*)N(L) END 上述程序运行后，输出的值为()。
A．3
B．5
C．7
D．9
答案
更多“阅读下列FORTRAN77程序：PARAMETER（L=3)INTEGER N（L)DATA N/3*0/DO 20 I=1，LDO 20 J=1，LN（J)=N（I)”相关的问题
第1题
阅读下列FORTRAN77程序： INTEGER A(3，3) DATA A/1，2，3，4，5，6，7，8，9/ S=0.0 DO 10 I=1，3 J=MOD(I，3)+1 S=S+A(I，J) 10 CONTINUE WRITE(*，*)S END 上述程序运行后，输出的S值为()。
A．15.0
B．12.0
C．18.0
D．24.0
第2题
阅读下列FORTRAN77程序： INTEGER A(4，5) DATA A/5*1，5*2，5*3，5*4/ M=0 DO 10 K=1，4 10 M=M+A(K，K+1) WRITE(*，*)M END 上述程序运行后，输出的M值为()。
A．8
B．9
C．10
D．11
第3题
阅读下列FORTRAN77程序： INTEGER A(4，5) DATA A/5*1,5*2,5*3,5*4/ M = 0 DO 10 K = 1,4 10 M = M + A(K ,K+1) WRITE (* , *) M END 上述程序运行后，输出的M值为()。
A．8
B．9
C．10
D．11
第5题
阅读下列FORTRAN程序： DO I=1，5 SUM=SUM+I ENDDO WRITE(*，*) SUM END 上述程序运行后，输出结果是()。
A．15
B．15.0
C．不确定
D．0
第6题
阅读下列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
第7题
阅读下列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
第8题
(2008年) 阅读下列FORTRAN程序： MQIUH=N(5)+N(10) WRITE(*，‘(2X，15)’)MQIUH END FUNCTION N(K) N=0 DO 10 J=1，K N=N+J 10 CONTINUE RETURN END 程序运行后的输出结果是()。
A．65
B．85
C．90
D．70
第9题
阅读下列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
第10题
阅读下列程序，写出程序运行结果。
import j ava. util. StringTokenizer；
public class C3301
{
public static void main(String[] args)
{
String ss="public static void main"；
StringTokenizer pas=new StringTokenizer(ss， " ") ；
int n=pas. countTokens() ；
System. out. println(n) ；
String s=pas. nextToken() ；
for(pas. nextToken() ； pas. hasMorcTokens() ； s=pas. nextToken()
System. out. println(s) ；
}
}
