閱讀下列程序 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語句中,“!”后的內(nèi)容為對整個程序或某行程序的說明,請在下面程序中感嘆號后,對相應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,F(xiàn)4.1) END 程序運行結(jié)果是()
閱讀下列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 程序運行結(jié)果是()
閱讀下列程序 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 程序運行結(jié)果是()