相关考题
-
单项选择题
当输入10，20时，下列程序执行后的输出结果为()。 READ(*，*)IX，IY A=100.0 IF(IX／IY.GT.0)THEN A=1.0 ELSEIF(IX／IY.LT.0)THEN A=-1.0 ELSE A=0.0 ENDIF WRITE(*，*)A END
A.0.0
B.1.0
C.–1.0
D.100.0 -
单项选择题
下列程序执行后的输出结果为()。 CHARACTER9*C C=’1234567890’ CALLSS(C) END SUBROUTINESS(X) CHARACTERX*2 WRITE(*，*)X END
A.123456
B.12
C.56
D.567890 -
单项选择题
当输入1.5，2.5，3.5，4.0下列程序执行后的输出结果为()。 DIMENSIONA(2，2) READ(*，*)A SUM=0 DO10I=1，2 DO20J=I，2 K=A(I，J)*I*J 10A(1，2)=K WRITE(*，*)A(2，1) END
A.4.0
B.5.0
C.6.0
D.7.0
