Question

Fortran中这句if语句如何理解?

Answer 1

这是Fortran中Arithmetic IF Statement即算术if语句,它的含义就是：当if中的值,分别是 0时,按相应顺序goto到后面的语句.具体到你的例子,就是：当a < 0时, goto 120

当 a >=0时,goto 100比如：read(*,*) a

if (a) 120, 100, 100

120 print *, "< 0"

print *, "---"

goto 200

100 print *, ">= 0"

200 continue运行结果：-1

< 0

---而1

>= 0