$n=<>;
die if $n<0;
print 2**$n*7/6|0;