阅读下列FORTRAN程序：DIMENSIONM（6）READ（*，*）MDO10J=1，6D010K=J，6IF（M（K）.LTM（J）THENN=M（K）M（K）=M（J）ENDIF10CONTINUEWRITE（*，100）（M（I），I=1，6）100FORMAT（2X，614）END键盘输入10、7、9、2、1、3；程序运行后的输出结果是（）。

阅读下列FORTRAN程序：DIMENSIONM（6）READ（*，*）MDO10J=1，6D010K=J，6IF（M（K）.LTM（J）THENN=M（K）M（K）=M（J）ENDIF10CONTINUEWRITE（*，100）（M（I），I=1，6）100FORMAT（2X，614）END键盘输入10、7、9、2、1、3；程序运行后的输出结果是（）。
A.1237910
B.1097321
C.7921310
D.3129710
正确答案：A
数组赋值以后，各数组元素的值为：M（1）=10M（2）=7M（3）=9M（4）=2M（5）=1M（6）=3当循环一次后M（1）的值就确定下来了，因此不需要再做下去。