m:-between(51,100,A),\+format("~d
~d
",[101-A,A]).