ex0409.f90

来自「正在从事科学计算的朋友学习fortran必备的书籍」· F90 代码 · 共 7 行

program ex0409
  real :: a
  a=3.14159/2.0
  write(*,*) "sin(",a,")=",sin(a)
  stop
end