单项选择题 当输入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

单项选择题 下列程序执行后的输出结果为()。 CHARACTER9*C C=’1234567890’ CALLSS(C) END SUBROUTINESS(X) CHARACTERX*2 WRITE(*，*)X END

单项选择题 当输入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