有人了解FORTRAN77吗?FORMAT(/3X,'P'smaterialdefinitionfile:',A20)CONTINUEREAD(5,'(A6,1X,A120)')KWORD,BUFFERIF(KWORD.EQ.KWCOMM)GOTO33尤其是最后一句话,这个是一个程序里的一小段,可能用到一些变量影响您分析

Question

有人了解FORTRAN77吗?
FORMAT(/3X,'P's material definition file:',A20)
CONTINUE
READ(5,'(A6,1X,A120)') KWORD,BUFFER
IF(KWORD.EQ.KWCOMM) GO TO 33
尤其是最后一句话,这个是一个程序里的一小段,可能用到一些变量影响您分析

Answer 1

解释如下：
FORMAT(/3X,'P's material definition file: ',A20) ! 格式语句,但是前面应该有语句标号
CONTINUE ! 继续语句,有人称之为空语句,本身也不干什么,就是（在逻辑上）往下继续执行
READ(5,'(A6,1X,A120)') KWORD,BUFFER ! 输入语句
IF(KWORD.EQ.KWCOMM) GO TO 33 ! 判断语句,假如满足条件,就转到语句标号为33的那条语句继续执行