program Project2;

{$APPTYPE CONSOLE}

uses
  SysUtils;

var n,i,j,k,z,q:integer;input,output:text;
begin
assign(input,'pair.in');
assign(output,'pair.out');
reset(input);
rewrite(output);
read(input,n);
close(input);
for i:=1 to n do  begin
for j:=1 to n do  begin
for z:=1 to n do
if (i mod z=0) and (j mod z=0) then
q:=z;
if z=i then
k:=k+1;
write(output,q);
close(output);
end.