var i,b,z:integer;
begin
     readln(b)
     z:=0
     for i:=1 to b do
         z:=z+1;
     writeln(z);
     readln;
end.