ex0408.f90

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

program ex0408
  real(kind=4) :: a,b
  a=1
  b=0.1
  write(*,*) a,"+",b,"=",a+b
  stop
end