uses crt;
var f:text; n,m,a,b,nn,mm:qword;
begin
clrscr;
assign(f,'VANNGHE.INP');reset(f);
readln(f,n,m);
close(f);
assign(f,'VANNGHE.OUT');rewrite(f);
nn:=n; mm:=m;
while nn<>mm do
if nn>mm then nn:=nn-mm else mm:=mm-nn;
writeln(f,nn);
a:=n div nn;
b:=mm div nn;
write(f,a,' ',b);
close(f);
end.