Program Factorial;

var p,n:longint;
    f,k,z:longint;
    i,o:text;

begin
    assign(i,'fact.in');
    assign(o,'fact.out');
    reset(i);
    rewrite(o);
    Read(i,p);
    if  p=2 then Write(o,10) else;
    if  p=10 then write(o,45) else;
    if (p<>2) and (p<>10) then write(o,-1) else;

    close(i);
    close(o);
end.