单项选择题下列程序执行时,需输入数据的记录个数必须为:DIMENSIONA(4,4)READ(*,*)A………………END()

A.1个
B.4个
C.16个
D.不超过16个


你可能感兴趣的试题

8.单项选择题对任意输入的x,READ(*,*)xK=SIN(x)WRITE(*,*)KEND此程序执行后K的值为:()

A.在区间[-1,1]中的一个值
B.一定等于0
C.在区间(-1,1)中的一个值
D.K=0或K=-1

9.单项选择题若有语句:READ(8,REC=6,ERR=10)BWRITE(8,6)X,Y则关于它们的描述,其中哪一条描述是正确的()?

A.顺序有格式读,顺序无格式写
B.直接有格式读,顺序有格式写
C.直接无格式读,直接无格式写
D.直接无格式读,顺序有格式写

10.单项选择题以下存在语法错误的OPEN语句是哪一条?()

A.OPEN(8)
B.OPEN(8,FORM=‘UNFORMATTED’)
C.OPEN(8,ACCESS=‘DIRECT’)
D.OPEN(8,FILE=‘AA’)

最新试题

有程序:DIMENSION(4,4)READ(*,*)AWRITE(*,10)A10FORMAT(1x,6E9.2)END此程序执行后的输出结果的记录数为:()

题型:单项选择题

有程序:CHARACTER*4STR1,STR2,STR3OPEN(UNIT=15,FILE=‘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’,程序运行结果是:()

题型:单项选择题

有程序:READ(*,100)A100FORMAT(3x,F6.2)WRITE(*,200)A200FORMAT(1x,F8.2)END当执行此程序时,从键盘输入1234567890↙,则程序的运行结果是:()

题型:单项选择题

有程序: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执行此程序的结果是:()

题型:单项选择题

下列说法中,正确的一条是()

题型:单项选择题

有程序:CHARATERX*2,Y*3,Z*4DATAX,Y,Z/‘AB’,‘CDE’,‘FGHI’/WRITE(*,100)X,Y,Z100FORMAT(1X,A1,A2,A3)END此程序的运行结果是:()

题型:单项选择题

有程序:N=0DOK=6,2,-2N=N+KM=2*N10CONTINUEWRITE(*,*)MEND上面程序的运行结果是:()

题型:单项选择题

有程序: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上面程序的运行结果是:()

题型:单项选择题

有程序:DATAA,B,C/4.0,-8.0,3.0/P=B*B-4*A*CIF(P.GE.0.0)THENS=(-B+SQRT(P))/(2*A)T=C/(A*S)P=(S+T)/2ELSES=0T=0ENDIFWRITE(*,*)PEND执行此程序,则运行的结果是:()

题型:单项选择题

有程序:M=2N=MD010I=1,N+1,NN=N*NM=M*N10CONTINUEWRITE(*,*)MEND此程序的运行结果是:()

题型:单项选择题