program ggg; var i,j,e,en: longint;
function nod(a,b:longint):longint;
begin
a:=abs(a);
b:=abs(b);
repeat
if a>b then a:=a mod b
else b:=b mod a;
until(a=0) or (b=0);
nod:=a+b;
end;
Begin
i:=1; e:=2; for j:=2 to 6 do begin
i:=i*e; en:=i+i;
writeln('(',e,',',en,')=', nod(e,en));
e:=en;
end;
end.