f=*r=0..100 f[X],f[Y]=f[Y=$'.to_i],f[X=$`.to_i]if/ / while gets p r.map{|k|a=k;~r.find{k==a=f[a]}}.reduce &:lcm