#include <fstream>
using namespace std;
ifstream f("permeuler.in");
ofstream g("permeuler.out");
int main()
{
    int n,i,ind;
    long long copien=-1;
    double rapfinal;
    long long s=0, x,y;
    while(f>>n)
    {
        int ind=1,d=2,e,f,cn=n;
        while(cn>1)
        {
           e=0; f=1;
           while(cn%d==0)
           {
               cn/=d;
               e++;
               f=f*d;
           }
           if(e>0)
           {
               f/=d;
               ind=ind*(d-1)*f;
           }
           if(d==2) d=3;
           else
            d+=2;
        }
        // daca n si ind
        int perm=1;
        for(int cf=0,nr=0; cf<=9 && perm==1; cf++)
        {
            x=n;
            y=ind;
            while(x)
            {
                if(x%10==cf) nr++;
                x=x/10;
            }
            while(y)
            {
                if(y%10==cf) nr--;
                y=y/10;
            }
            if(nr!=0)
                perm=0;
            nr=0;
        }
        if(perm==1)
        {
            double rap=(n*1.00)/ind;
            if(copien==-1)
            {
                copien=n;
                rapfinal=rap;

            }
            else
                if(rapfinal-rap>0)
                {
                   copien=n;
                   rapfinal=rap;
                }
        }
    }
    g<<copien;
    return 0;
}