fortran读取文件的路径

1 打开浏览器设置，点击系统和性能
2 关闭启动增强
3 关闭浏览器
4 在开始菜单中搜索 Microsoft Edge，并右击打开文件位置
打开文件位置
5 在打开的窗口中右键点击 Microsoft Edge 并选择属性
6 在目标的最后添加（最前面有一个空格）
--disable-features=msUndersideButton
7 点击确定，可能需要重启系统或者从任务管理器中结束所有浏览器进程才能生效

在格式语句中加入斜杠"\"表示不换行输出；加入反斜杠"/"表示换行输出。
例如：输出三角阵
k=0
do 10 i=1,8
do 20 j=1,8
k=k+1
if (jlei) write(,100)k
20 continue 
write(,)
10 continue
100 format(1x,i5\)
end
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
结果为：
    1 
    9    10 
   17    18    19 
   25    26    27    28 
   33    34    35    36    37 
   41    42    43    44    45    46 
   49    50    51    52    53    54    55 
   57    58    59    60    61    62    63    64 

具体表达为：
do
read(11,"(A46)",iostat=stat1) filename
if(stat1/=0) exit
end do
通过 if(stat1/=0) exit 就可以判断是否已经读取到文件的结尾，从而完成循环的 *** 作。

---