implicit none integer(8) a,b,c,d,i read(*,*) a read(*,*) b do i=1,b read(*,*) c,d if (c==a) then a=d else if (d==a) then a=c end if end do write(*,*) a end