ex0408.f90

Fortran 95程序设计【彭国伦】第4章原代码

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