programs/first-steps/src/print.f

   1 CFORTRAN PROGRAM
   2 C       SUBROUTINE MAIN()
   3        WRITE (4,33)
   4 33     FORMAT(43HDIES IST DIE ERSTE ZEILE AUF DEM DRUCKER.         )
   5        PAUSE 3
   6        WRITE (4,34)
   7 34     FORMAT(43HDIES IST DIE ZWEITE ZEILE AUF DEM DRUCKER.         )
   8        END
   9 $0