正确答案: A

0.0

题目：有程序：INTEGERM（3，4）DATAM／4*-1，4*-2，4*-3／S=0DO10I=1．310S=S+M（I，I+1）DO20I=4，2，-120S=S-M（I-1，I）WRITE（*，*）SEND上面程序的运行结果为：（）

解析：当第一个循环执行完后，S=S+M（1，2）+M（2，3）+M（3，4）=（-1）+（-2）+（-3）=-6；执行完第二个循环时，S=S-（M（3，4）+M（2，3）+M（1，2）=-6-（-6）=0。

查看原题 查看所有试题

学习资料的答案和解析：

[单选题]软盘加上写保护后，可以对它进行的操作是（）

只能读盘，不能写盘

解析：当软盘加上写保护后，其作用是不能向磁盘内写信息。

[单选题]有程序：DIMENSIONA（2，2）READ（*，*）ASUM=0DO10I=1，2D010J=1，210A（I，J）=A（I，J）+I+JWRITE（*，*）A（1，2）END当输入1、2、3、4时，此程序执行后的输出结果为：（）

6

解析：数组按列主序存放，A（1，1）=1，A（2，1）=2，A（1，2）=3，A（2，2）=4。当I=1，J=2时，A（1，2）=3+1+2=6。

[单选题]有程序：READ（*，100）A100FORMAT（3x，F6．2）WRITE（*，200）A200FORMAT（1x，F8．2）END当执行此程序时，从键盘输入1234567890↙，则程序的运行结果是：（）

A.4567.89B.1234.56C.******D.1234.5

解析：注意在读入数据时，按场宽截取数据，空3个格从4开始截取到9共6列，而后按d指定的位数确定小数点位置，小数点保留2位。则A为4567．89，按200语句格式输出，场宽8位，小数点保留2位。

[单选题]有程序：INTEGERB（3，3）DATAB／3*2，3*3，3*4／DO10I=1，310WRITE（*，‘（1X，3I2）’）（B（I，J），J=1，3）END此程序的运行结果是：（）

2；3；4；2；3；4；2；3；4

解析：程序中利用DATA语句为数组提供变量是按列主序进行的，即A（1，1）=2，A（2，1）=2，A（3，1）=2，A（1，2）=3，A（2，2）=3，A（3，2）=3，A（1，3）=4，A（2，3）=4，A（3，3）=4，而输出是按隐含循环形式进行，即按行主序输出。应选择答案B。