program operation
  implicit none
  integer a, b, c, d
  real e, f
  double precision g
  a = 1+3           ! aに1+3の結果(4)を代入
  b = a-2           ! bにa-2を代入
  c = a*2           ! cにa*2を代入
  d = 1/a           ! dに1/aを代入（小数点以下切り捨て）
  print *, a, b, c, d
  e = 6.0/2.0       ! eに6÷2を代入
  f = e**3.0        ! eの3乗をfへ代入
  g = 4d0*(2d0+1d0) ! かっこを使って足し算を先に行う例
  print *, e, f, g
end program operation
