$ 是一种不标准的写法。表示不换行。如果不这样写,运行后是这样:Input N=3 6这样写了以后,运行后是这样:Input N=3 6这不标准,标准的写法是: WRITE(*,'(A)', advance='no') 'Input N=' READ *,N
相当于如下两句:write(*,100)'Input N='100 format(A,$)其中A是字符型数据输出描述符,$表示输出后不换行,相当于format(A\)