ex0411.f90

来自「Fortran95的一些有用的源程序」· F90 代码 · 共 11 行

program ex0411
  complex :: a,b
  a=(1.0,1.0)
  b=(1.0,2.0)
  write(*,*) "a+b=",a+b
  write(*,*) "a-b=",a-b
  write(*,*) "a*b=",a*b
  write(*,*) "a/b=",a/b
  stop
end