阅读下列程序 LOGICAL L READ(*,*)A,B L=A.GT.B IF(L)THEN X=B+2*A ELSE X=B END IF WRITE(*,*)X END 使用键盘为上述程序输入两个初值4和3,其输出的X值是()
Fortran语句中,“!”后的内容为对整个程序或某行程序的说明,请在下面程序中感叹号后,对相应fortran语句进行说明。
阅读下列程序 K(X,Y)=X/Y+X A=-2.0 B=4.0 B=1.0+K(A,B) WRITE(*,10)B 10 FORMAT(1X,F4.1) END 程序运行结果是()
阅读下列FORTRAN程序: INTEGER AA(2,3) DATA AA/1,2,3,4,5,6/ CALL S2D19(AA) CALL S2D19(AA(1,2)) END SUBROUTINE S2D19(BB) INTEGER BB(2,2) WRITE(*,'(1X,2I3)') BB(1,1),BB(2,2) END 程序运行结果是()
阅读下列程序 LOGICAL L1,L2,L3,L4,L5 DATA L1,L2,L3/3*.TRUE./ L4=.NOT.L1.AND..NOT.L2.AND.L3 L5=.NOT.L1.OR..NOT.L2.OR.L3 WRITE(*,*)L4,L5 END 程序运行结果是()