单项选择题
有程序:LOGICALA,B,C,DINTEGERX,YDATAX,Y,A,B/1,-1,2*.FALSE./C=.NOT.A.AND(B.OR.XGE.Y)D=.NOT.(A.AND.B.OR、X.GE.Y)WRITE(*,*)C,DEND上面程序的运行结果是:()
A.TT
B.FF
C.TF
D.FT
点击查看答案&解析
相关考题
-
单项选择题
有程序:CHARATERX*2,Y*3,Z*4DATAX,Y,Z/‘AB’,‘CDE’,‘FGHI’/WRITE(*,100)X,Y,Z100FORMAT(1X,A1,A2,A3)END此程序的运行结果是:()
A.ABCDEF
B.ACDFGH
C.******
D.ABCDEFGHI -
单项选择题
有程序:READ(*,100)A100FORMAT(3x,F6.2)WRITE(*,200)A200FORMAT(1x,F8.2)END当执行此程序时,从键盘输入1234567890↙,则程序的运行结果是:()
A.4567.89
B.1234.56
C.******
D.1234.5 -
单项选择题
有程序:ADD(X,Y)=X**2+YOPEN(8,FILE=‘F’,STATUS=‘NEW’,ACCESS=‘DIRECT’,*FORM=‘UNFORMATTED’,REAL=16DO10I=1,4D=ADD(REAL(I),2、0)WRITE(8,REC=I)D10CONTINUECLOSE(8)OPEN(2,FILE=‘F’,STATUS=‘OLD’,ACCESS=‘DIRECT’,*FORM=‘UNFORMATTFED’,REAL=6DO20I=2,4,2READ(2,REC=I)CWRITE(*,30)C20CONTINUE20FORMAT(1x,F4.1)CLOSE(2)END执行此程序的结果是:()
A.3.0;11.0
B.6.0;11.0
C.6.0;18.0
D.11.0;18.0
