?? scan_1.f90
字號:
program b integer w character(len=2) s, t s = 'xi' w = scan(s, 'iI') if (w /= 2) call abort w = scan(s, 'xX', .true.) if (w /= 1) call abort w = scan(s, 'ab') if (w /= 0) call abort w = scan(s, 'ab', .true.) if (w /= 0) call abort s = 'xi' t = 'iI' w = scan(s, t) if (w /= 2) call abort t = 'xX' w = scan(s, t, .true.) if (w /= 1) call abort t = 'ab' w = scan(s, t) if (w /= 0) call abort w = scan(s, t, .true.) if (w /= 0) call abortend program b ?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -