program expresii2;
var x,y:qword;
    i,j,n,p,k:longint;
    f,g:text;
begin

 assign(f,'expresii2.in'); reset(f);
 assign(g,'expresii2.out'); rewrite(g);
 readln(f,n,k,p);
 if n mod 2=0 then begin
   x:=1;    y:=1;
   for i:=1 to n div 2-1 do begin y:=y*3; x:=x*k; end;
   x:=x*y;
   writeln(g,x+1);
   for i:=1 to n div 2 do write(g,'A');
   for i:=1 to n div 2-1 do write(g,'+');
   writeln(g,'!');
 end
 else begin
   y:=1; x:=1;
   for i:=1 to (n div 2)+1 do begin y:=y*3; x:=x*k; end;
   y:=y div 3;
   writeln(g,x*y);
   for i:=1 to n div 2+1 do write(g,'A');
   for i:=1 to n div 2 do write(g,'+');
   writeln(g);
 end;
   close(f); close(g);
end.