e_4_2_5.f90

来自「Fortran77和90_95编程入门,里面还有详细的例子。」· F90 代码 · 共 10 行

INTEGER bells(4) !07是响铃字符
CHARACTER(4) wys(3),cvar
DATA bells/4*7/,cvar/' is'/,wys/'What',' you',' see'/
OPEN(3,FILE='BSEQ',FORM='BINARY')
WRITE(3) wys,cvar
WRITE(3) 'what', ' you get!'
WRITE(3) bells
CLOSE(3)
END