gets$~
b=[*"A".."Z"]-["I"]
361.times{|k|!/#{c=[d=b[j=k/19],1+i=k%19]}$/&&~/[#{b[j-1,3]}]#{i+1}$|#{d}(#{i}|#{i+2})$/&&$><<c<<$/}