k\equiv r(mod\ \varphi(a))