在Fortran中输入终端上的值之前提示用户输入文本

Question

我想知道如何让fortran让我在屏幕上输入一个值（来自循环），我的意思是，我有一个简单的循环（在脚本中）：

if (ns.eq.1) then
 f(i,n+1)=5*sign(1.,(20-(x-c*t))*((x-c*t)-10))
 elseif (ns.eq.2) then
  f(i,n+1)=(1-mu)*f(i,n)+(mu*f(i-1,n))

endif
   enddo

我想出现在（终点站）（当我做gfortran ......等等） '输入值ns' 所以我可以把1和它绘制第一个案例，如果我把2，它让我成为第二个情节 我试过

write(*,*)'Enter a value of ns'   
read(*,*) ns

但它不起作用

Answer 1

可能起作用的是：

write (*,'(A)',advance='no') 'Enter a value of ns '
read (*,*) ns

Fortran标准中没有保证这会做你想要的，但几乎每个实现都有。