Problem:
Score: 400 points

Problem Statement

The Kingdom of Takahashi has N towns, numbered 1 through N.

There is one teleporter in each town. The teleporter in Town i (1 \leq i \leq N) sends you to Town A_i.

Takahashi, the king, loves the positive integer K. The selfish king wonders what town he will be in if he starts at Town 1 and uses a teleporter exactly K times from there.

Help the king by writing a program that answers this question.

Constraints

2 \leq N \leq 2 \times 10^5

1 \leq A_i \leq N

1 \leq K \leq 10^{18}

Input

Input is given from Standard Input in the following format:

N K
A_1 A_2 \dots A_N

Output

Print the integer representing the town the king will be in if he starts at Town 1 and uses a teleporter exactly K times from there.

Sample Input 1

4 5
3 2 4 1

Sample Output 1

4

If we start at Town 1 and use the teleporter 5 times, our travel will be as follows: 1 \to 3 \to 4 \to 1 \to 3 \to 4.

Sample Input 2

6 727202214173249351
6 5 2 5 3 2

Sample Output 2

2

Solution in Fortran (GNU Fortran 9.2.1) (judge verdict: Wrong Answer)

      module takahashiMod
      implicit none
      integer(16),allocatable :: a(:)
      
      contains
      
      end module
      
      program teleporter
      use takahashiMod
      implicit none
      integer(16) :: n,k
      integer(16),allocatable :: telepoNum(:)
      integer(16) :: i,start,startTown,finTown,mo, now,next
      logical,allocatable :: flag(:)
      logical piyo
      
      read*,n,k
      allocate( a(n) )
      read*,a(1:n)
!print*,n,k
!print*,a(:)
      
      
      allocate( telepoNum(n),flag(n) );flag = .false.
      
      telepoNum(1) = 1
      do i = 2,n
        telepoNum(i) = a( telepoNum(i-1) )
      end do
!print*,telepoNum
      
      do i = 1,n
        if( flag(telepoNum(i)) )then
          start = telepoNum(i)
          exit
        else
          flag(telepoNum(i)) = .true.
        end if
     !   print*,flag
      end do
!print*,start
      
      i = 0
      piyo = .false.
      do while(.true.)
        i = i + 1
        if( telepoNum(i)==start )then
          if( piyo )then
            finTown = i
            exit
          else
            startTown = i
          end if
          piyo = .true.
        end if
      end do
      mo = finTown - startTown
!print*,startTown,finTown,mo
      k = mod( k-startTown+1,mo )
!print*,k
      print*,telepoNum(k+1+(startTown-1))
      end program