Question

FORTRAN 运行不了，怎么回事，下面是代码

IMPLICIT NONE
INTEGER::A,B,C
DO
PRINT*,'INPUT A,B,C'
READ(*,*) A,B,C

IF(A>B) PAUSE "A>B"
IF(A<B) PAUSE "A<B"
IF(1==C) PAUSE 01
IF(20==C) PAUSE 20
IF(20<C) PAUSE "C IS LARGER THAN 20"
IF(0>C) PAUSE "C IS LITTLER THAN 0"
ENDDO

END
编译没有错误，连接也对，执行的时候运行不了，我用的是CVF6.6编译器，可能在编译器使用上有问题？

Answer 1

可能是PAUSE出问题。
可以试一下用 IF ELSEIF 结构，同时将Pause改为 Print

Answer 2

编译错误还是运行错误？错误代码？
=========
晕，怎么个运行不了，至少把错误的提示信息发上来，可能造成执行不了的原因太多了，这样根本什么都看不出来

Answer 3

不知道目的是想干什么。
这本身就是一个死循环，并且在循环中还要一个一个的判断。
你说清楚要做什么，很容易给你编一个程序。