| Etusivu | Arkielämävalikko | Historiasivu | 
| <<<<< | >>>>> | 
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: Jason Verch
      PROGRAM HELLO
      DO 10, I=1,10
      PRINT *,'Hello World'
   10 CONTINUE
      STOP
      END
      submitted by: Andy Gardner