单选题
A0
B2
C2.5
D1
正确答案
答案解析
当I=1，J=2时，I／J=0，K为整型变量。
相似试题
有程序：K=0DO10I=1，6，2DO10J=1，6，3IF（K．LT．I*J）K=I*J10CONTINUEWRITE（*，*）KEND此程序执行后的输出结果为：（）
单选题查看答案
有程序：INTEGERM（5，5）L=0DO40J=1，5DO40K=1，5M（J，K）=K40CONTINUEDO10I=1，5N=1IF（MOD（I，2）．EQ．0）N=2DO10J=N，5，2L=L+M（I，J）10CONTINUEWRITE（*，20）L20FORMAT（2X，‘L=’，I3）END此程序运行的结果为：（）
单选题查看答案
有程序：K=1DO10I=1，2DO10J=1，210K=K*I／JWRITE（*，*）KEND此程序执行后的输出结果为（）
单选题查看答案
有程序：INTEGERPP=0DO10I=0，10，3DO10J=5，100，20DO10K=-10，-5，-110P=P+1WRITE（*，*）PEND此程序的运行结果是：（）
单选题查看答案
有程序：INTEGERA（3）DATAA／3*1／N=2DO10I=1．NDO10J=1，N10A（I）=A（J）+1WRITE（*，*）A（N）END此程序的运行结果为：（）
单选题查看答案
有程序：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时，此程序执行后的输出结果为：（）
单选题查看答案
有程序：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上面程序的运行结果为：（）
单选题查看答案
有程序：DIMENSIONA（4，3）DATAA／3*-1．0，3*-2．0，3*-3．0，3*-4．0／S=0．0DO10K=1，4D=ABS（A（K，1））DO20J=2，3IF（ABS（A（K，J））．GT．D）D=ABS（A（K，J））20CONTINUES=S+D10CONTINUEWRITE（*，*）SEND此程序执行后的结果为：（）
单选题查看答案
有程序：DO10I=1，5，3DO10J=I，310K=I+JWRITE（*，*）KEND此程序的运行结果是：（）
单选题查看答案