main=readLn>>= \n->print $ 2*(div n 3 + div n 5)