var a,i:longint;
begin
read(a);
for i:=1 to 6 do
begin
a:=a+2;
a:=a*2;
end;
write(a);
end.
/**************************************************************
	Problem: 1688
	User: admin
	Language: Pascal
	Result: Wrong Answer
****************************************************************/