constzn:string[36]=\'0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ\';function Convert(a:longint;base:byte):string;var s:string;begins:=\'\';repeats:=zn[(a mod base)+1]+s;a:=a div base;until a=0;Convert:=s;end;var f,g:text;n,i,j,k,d:longint;s:string;b:boolean;m:set of char;beginassign(f,\'input.txt\');reset(f);assign(g,\'output.txt\');rewrite(g);read(f,n);close(f);for i:=2 to 36 do beginj:=n;s:=Convert(j,i);m:=[];b:=true;k:=1;d:=length(s);while(k<=d)and b doif s[k] in m then b:=falseelsebegininclude(m,s[k]);inc(k);end;if b then writeln(g,\' \',i,\' \',s); end;close(g);end.