Fortran


c
c   Hello, world.
c
      Program Hello

      implicit none
      logical DONE

      DO while (.NOT. DONE)
        write(*,10)
      END DO
   10 format('Hello, world.')
      END


submitted by: verch@cedar.buffalo.edu (Jason Verch)


Looping Version
        PROGRAM HLWRLD
 
        DO WHILE (1 .EQ. 1)
          PRINT *, 'Hello, World!'
        END DO
        STOP
        END


submitted by: mcornick@d.umn.edu (Mandy Cornick)