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

A.0
B.24
C.120
D.144


最新試題

有程序:F(C,D)=A*C+B/DA=1.0B=2.0WRITE(*,*)F(A,B)+F(B,A)END此程序的運(yùn)行結(jié)果是:()

題型:?jiǎn)雾?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的值是:()

題型:?jiǎn)雾?xiàng)選擇題

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

題型:?jiǎn)雾?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é)果是:()

題型:?jiǎn)雾?xiàng)選擇題

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

題型:?jiǎn)雾?xiàng)選擇題

有程序:INTEGERFF(X,Y)=X+YA=-2.0B=4.0B=1.0+F(A,B)WRITE(*,‘(1X,F(xiàn)3.1)’)BEND此程序的運(yùn)行結(jié)果是:()

題型:?jiǎn)雾?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é)果為:()

題型:?jiǎn)雾?xiàng)選擇題

有程序:CHARACTER*4A,B*6A=‘ABCD’B=A∥‘EFGH’WRITE(*,*)BEND此程序執(zhí)行后的輸出結(jié)果為:()

題型:?jiǎn)雾?xiàng)選擇題

有程序:M=2N=MD010I=1,N+1,NN=N*NM=M*N10CONTINUEWRITE(*,*)MEND此程序的運(yùn)行結(jié)果是:()

題型:?jiǎn)雾?xiàng)選擇題

有程序:CHARACTER*4STR1,STR2,STR3OPEN(UNIT=15,F(xiàn)ILE=‘INPUT.DAT’,STATUS=‘OLD’)READ(15,10)STR1,STR2,STR310FORMAT(A6,1x,A5,1x,A4)WRITE(*,’(1x,3A)’)STR1,STR2,STR3CLOSE(15)END用此程序從文件INPUT.DAT中讀出字符串’FORMATANEWDISK’,程序運(yùn)行結(jié)果是:()

題型:?jiǎn)雾?xiàng)選擇題