program prog
      data num /3,4/, num2 /5/
      dimension num(2)
      write(6, *) num(1), num(2), num2
      end