本文摘於
howard(howard)                          howard@pc4.hinet.net
Devil(璉璉)                             Devil.bbs@vlsi1.iie.ncku.edu.tw
yhtsai(Yi-Hwai Tsai)                    yhtsai@beta.wsl.sinica.edu.tw
760888()                                760888@ucle.ucle.itri.org.tw
----------------------------------------------------------------------------
發信人: howard@pc4.hinet.net (howard), 信區: fortran

program test

integer number

write(*,*) 'please input numbers: '
read(*,*) number

end

為何在執行時,游標會跑到第二行的開頭,而不會接在 'please input numbers'
的後面?
有沒有方法可以解決!?

----------------------------------------------------------------------------
發信人: Devil@bar (璉璉), 信區: fortran

由於 write (*,*) 會自動送出跳行+歸位字元, 所以會跳到下一行.
解決方案各家的編譯器有自己的方法, 如 MS Fortran 是以倒斜線來
表一行未完抑至跳行.
例:
 program test

 integer number

 write(*,'(1x,a,\)') 'please input numbers: '
 read(*,*) number

 end

----------------------------------------------------------------------------
發信人: yhtsai@beta.wsl.sinica.edu.tw (Yi-Hwai Tsai), 信區: fortran

  write(*,'(A22,$)') 'please input numbers: '
  
  This format can work under HP-UX FORTRAN, SunOS 5.4 SparcWorks FORTRAN, 
  VAX-VMS FORTRAN, Macintosh Absoft FORTRAN compiler.
  
  I don't know how about PC's MS FORTRAN or Nag FORTRAN, because I don't use P.
----------------------------------------------------------------------------
發信人: 760888@ucle.ucle.itri.org.tw (), 信區: fortran


        write(*,'($,a)')'pl...'
        read(*,*) number
or
        write(*,'(+,a)')'pl...'
        read(*,*)number