print 81,map"
plus 3 3 $_",(3,3,1)x16,1 ."
div 3 3"x32