(do((z(read)(/(if(odd? z)(+(* z 6)2)z)2)))((=(if(print z)1)z)))