質問21/42
次のプログラムの正しい出力結果は以下のどれでしょうか？

   
module common   
  implicit none   
contains   
  subroutine swap(a, b)   
    integer, intent(inout) :: a, b   
    integer :: temp   
    temp = a   
    a = b   
    b = temp   
  end subroutine swap   
end module common   
   
program main   
  use common   
  implicit none   
  integer :: x = 5, y = 8, temp = 0   
  call swap(x, y)   
  print *, x, y, temp   
end program main