program main
  implicit none
  integer i, x(4)
  do i = 1, 3
    x(i) = i
  end do
  print *, x ! 部分的に初期化されていない x を参照している！
end program