#!perl -ln
$b=$_%6>1;print"$_ = 6 * ",int($_/6)+$b,$b?' - 1':' + 1'