單項(xiàng)選擇題有程序:READ(*,100)A100FORMAT(3x,F(xiàn)6.2)WRITE(*,200)A200FORMAT(1x,F(xiàn)8.2)END當(dāng)執(zhí)行此程序時(shí),從鍵盤輸入1234567890↙,則程序的運(yùn)行結(jié)果是:()

A.4567.89
B.1234.56
C.******
D.1234.5


你可能感興趣的試題

4.單項(xiàng)選擇題有程序:INTEGERM(3,3)DATAM/1,2,3,4,5,6,7,8,9/DO10I=1.3DO10J=1,3K=M(I,J)M(I,J)=M(J,I)M(J,I)=K10CONTINUEWRITE(*,100)((M(I,J),J=1,3),I=1,3)100FORMAT(1x,3I2)END此程序執(zhí)行后的結(jié)果為:()

A.1;4;7;2;5;8;3;6;9
B.1;2;3;4;5;6;7;8;9
C.9;6;3;8;5;2;7;4;1
D.7;8;9;4;5;6;1;2;3

最新試題

有程序:DATAI,M,N/2,1,4/10M=M*II=I+1IF(I.GT.N)GOT020GOTO1020WRITE(*,*)MEND執(zhí)行此程序后,輸出結(jié)果為:()

題型:單項(xiàng)選擇題

有程序:INTEGERM(3,3)DATAM/1,2,3,4,5,6,7,8,9/DO10I=1.3DO10J=1,3K=M(I,J)M(I,J)=M(J,I)M(J,I)=K10CONTINUEWRITE(*,100)((M(I,J),J=1,3),I=1,3)100FORMAT(1x,3I2)END此程序執(zhí)行后的結(jié)果為:()

題型:單項(xiàng)選擇題

有程序:LOGICALLL=.TRUE.READ(*,*)xIF(x.LT.0)THENL=.FALSE.ELSEWRITE(*,*)xENDIFIF(.NOT.L)WRITE(*,*)-xEND執(zhí)行兩次以上程序,若運(yùn)行中的輸入值分別為2.5和-1.0,則兩次運(yùn)行結(jié)果分別是:()

題型:單項(xiàng)選擇題

下列說法中,正確的一條是()

題型:單項(xiàng)選擇題

有程序:CHARACTER*6SS=‘ABCDEF’CALLSS(S)ENDSUBROUTINESS(S1)CHARACTERS1*3WRITE(*,*)S1END此程序執(zhí)行后的輸出結(jié)果為:()

題型:單項(xiàng)選擇題

有程序:CHARATERX*2,Y*3,Z*4DATAX,Y,Z/‘AB’,‘CDE’,‘FGHI’/WRITE(*,100)X,Y,Z100FORMAT(1X,A1,A2,A3)END此程序的運(yùn)行結(jié)果是:()

題型:單項(xiàng)選擇題

有程序:READ(*,10)IA,IIF(IA.GE.125)THENI=I+10,ELSEI=I-10ENDIFWRITE(*,*)I10FORMAT(I2,I1)END執(zhí)行上面的程序時(shí),從鍵盤輸入365,2,則運(yùn)行后結(jié)果I的值是:()

題型:單項(xiàng)選擇題

下列程序執(zhí)行時(shí),需輸入數(shù)據(jù)的記錄個(gè)數(shù)必須為:DIMENSIONA(4,4)READ(*,*)A………………END()

題型:單項(xiàng)選擇題

有程序:INTEGERPP=0DO10I=0,10,3DO10J=5,100,20DO10K=-10,-5,-110P=P+1WRITE(*,*)PEND此程序的運(yùn)行結(jié)果是:()

題型:單項(xiàng)選擇題

有程序:DIMENSIONA(4,3)DATAA/3*-1.0,3*-2.0,3*-3.0,3*-4.0/S=0.0DO10K=1,4D=ABS(A(K,1))DO20J=2,3IF(ABS(A(K,J)).GT.D)D=ABS(A(K,J))20CONTINUES=S+D10CONTINUEWRITE(*,*)SEND此程序執(zhí)行后的結(jié)果為:()

題型:單項(xiàng)選擇題