$@-=$a-??,($a,$@)=/\d.* /?grep$&==($_=$a+=$@)%$',a..ha:-print$@?$a%$@." + $@k
":"no solutions
"for<>