正确答案: B
20
题目:有程序:DIMENSIONA(2,2)INTEGERA,YY=0DO20I=1,2D020J=1,2A(I,J)=I*I+J*JY=Y+A(I,J)20CONTINUEWRITE(*,*)YEND此程序运行的结果为:()
解析:程序运行时利用双重循环为数组A赋值,其中A(1,1)=2,A(1,2)=5,A(2,1)=5,A(2,2)=8,再经过Y=Y+A(I,J)累加后,其结果为20。
查看原题 查看所有试题
学习资料的答案和解析:
[单选题]WindowsXP系统安装并启动后,由系统安排在桌面上的图标是:()
回收站
[单选题]对OPEN(4,FILE=‘BB.DAT’,STATUS=‘OLD’,语句,下面哪个描述是正确的()?
打开一个有格式顺序文件,可以读文件
解析:语句中STATUS=‘OLD’表明是一个已存在的老文件,打开后可顺序读取。
[单选题]有程序:INTEGERM(3,3)DATAM/1,2,3,4,5,6,7,8,9/DO10I=1.3DO10J=1,3K=M(I,J)M(I,J)=M(J,I)M(J,I)=K10CONTINUEWRITE(*,100)((M(I,J),J=1,3),I=1,3)100FORMAT(1x,3I2)END此程序执行后的结果为:()
1;4;7;2;5;8;3;6;9
解析:执行完循环语句之后,M(1,1)=1,M(2,1)=2,M(3,1)=3,M(1,2)=4。M(2,2)=5,M(3,2)=6,M(1,3)=7,M(2,3)=8,M(3,3)=9,由于是按隐含循环的形式输出,每行输出3个数据,按行主序输出,故应选答案A。