【求助】Fortran 输入请教！

yexm

在 Fortran 中需要读入一个变量。
语句为：  
print*,'Please input your choice:'
read(*,*) I
  
在执行 print 语句之后光标就自动回行了。停留在新的一行等待输入。
现在我想能不能使光标停留在 “choice：” 后面等待输入？
也就是说在执行完print 语句之后使光标不自动回行？

galever

改为:
          write(*,1000)  
1000   format(" Please input your choice",$)
          read(*,*) I
即可达到你的要求.

yexm

搞定。
谢谢 galever！
以后还请多多指教！

zhanghuaa

这样也可
       WRITE(*,'(A\)') '-----PLEASE INPUT YOUR DATE-FILE NAME---!'
        READ(*,'(A)') NAM1

galever

zhanghuaa wrote:
这样也可
       WRITE(*,'(A\)') '-----PLEASE INPUT YOUR DATE-FILE NAME---!'
        READ(*,'(A)') NAM1

      zhanghuaa的方法也不错.

yexm

zhanghuaa wrote:
这样也可
       WRITE(*,'(A\)') '-----PLEASE INPUT YOUR DATE-FILE NAME---!'
        READ(*,'(A)') NAM1

  
请教zhanghuaa:
参数'(A)'代表什么意思？
谢谢！

galever

按字符读入

yexm

明白，那么如果需要读入的是数据，按这种方法是不是不行了？
读入的数据也变成字符型的。
而且我还发现按照这种方法好像最多一次最多只能读入4个字符。
输入多于四个字符，后面的不认。
不知道这是为什么？