ex0416.f90

来自「Fortran 95程序设计&Code-彭国伦」· F90 代码 · 共 7 行

program ex0416
  logical a,b
  a=.true.
  b=.false.
  write(*,*) a,b
end