program main
integer :: n,t,m=10000
integer,allocatable :: c(:),t2(:)
integer :: i
read(*,*)n,t
allocate(c(n),t2(n))
do i=1,n
	read(*,*)c(i),t2(i)
end do

do i=1,n
	if (t2(i) <= t) then
    	m = min(m,c(i))
    end if
end do
if (m == 10000) then
	write(*,*)'TLE'
else
	write(*,*)m
end if
end program