var a,b,c,d,e:longint;
begin
read(a);
if a<=100 then b:=a*2
          else b:=a*1+100;
          write(b);
          end.
/**************************************************************
	Problem: 1637
	User: admin
	Language: Pascal
	Result: Wrong Answer
****************************************************************/