📄 io1.f
字号:
* Fixed by 1998-09-28 libI77/open.c change. open(90,status='scratch') write(90, '(1X, I1 / 1X, I1)') 1, 2 rewind 90 write(90, '(1X, I1)') 1 rewind 90 ! implicit ENDFILE expected read(90, *) i read(90, *, end=10) j call abort() 10 end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -