PHP Code:
(*m m^(-1≡ SoDu [mod n]*)
PhanTuKhaNghich[m_SoDu_n_] := Module[{tempij},
          
temp = {};
          
1;
          While[
<= n,
                    
SoDu i*n;
                    If[
Mod[jm] == 0temp Append[tempMod[j/mn]]];
                    
i++;
            ];
          Return[
Union[temp]];
      ];