早教吧 育儿知识 作业答案 考试题库 百科 知识分享

这段fortran语言输入上有问题,程序应该没什么问题,还望各位大侠指教……CHARACTERLINE(6),CHCDATA(LINE(I),I=1,6)/'D','E','L','E','T','E'/CCH='E'P=1N=6READ(*,*)(LINE(I),I=1,N)CREAD(*,*)CHCH='E'do10,WHILE(N>P)DO

题目详情
这段fortran语言输入上有问题,程序应该没什么问题,还望各位大侠指教……
CHARACTER LINE(6),CH
CDATA (LINE(I),I=1,6)/'D','E','L','E','T','E'/
CCH='E'
P=1
N=6
READ (*,*) (LINE(I),I=1,N)
CREAD (*,*) CH
CH='E'
do 10,WHILE(N>P)
DO 20,WHILE(CH.NE.LINE(P).AND.P
▼优质解答
答案和解析
现在的输入方法也行,但是可以用格式输入,比如
READ (*,‘(6A)') (LINE(I),I=1,N)