Tekst programu zabawka.f

      program zabawka
      open (1,file="wierszyk.txt")
      write (1,*) "Jam jest program fortranowy"
      write (1,*) "Pisaly mnie tegie glowy."
      write (1,*) "I choc we mnie same rajty"
      write (1,*) "To i tak pozeram bajty."
      stop
      end