program dvojcisli;

var a,b,c,d,e,i,q,w,y,j,u,z,cc,dd,ee: longint;
txt1,txt2,txt3,txt4,txt5,txt6,txt7,txt8,txt9,txt10: string;




begin

readln(txt1);
readln(txt3);
txt2:=txt1[length(txt1)-1] + txt1[length(txt1)];
val(txt2, a, b);
writeln(a);
w:=0;
j:=1;
for y:=1 to 10 do
begin
txt4:= txt3[length(txt3)-y+1];
val(txt4, q, d);
w:=w+q*j;
j:=j*2;
end;
if w<10 then
c:=w
else
begin
str(w, txt7);
txt8:=txt7[length(txt7)-1] + txt7[length(txt7)];

val(txt8, c, u);

end;
writeln(c);




z:=a*a;
for i:=1 to c-2 do
begin

str(z, txt9);
txt10:=txt9[length(txt9)-1] + txt9[length(txt9)];
writeln(txt9);
val(txt10, cc, dd);
z:=cc*a;
writeln(cc);
writeln(z);


end;


str(z, txt5);
txt6:=txt5[length(txt5)-1] + txt5[length(txt5)];
writeln(txt6);

readln(e);

end.