# [J], 37 bytes +^:((=1#.,.&.":)*:[=]|~10^#@":@[)^:_~ [Try it online!](https://tio.run/##y/r/P81WT0E7zkpDw9ZQWU9HT01PyUpTyyraNramztAgTtlBycohWjPOKr7uf2pyRr5CmoKhEReMZQxnmcBZpnCWGZxlDmdZwFmWMJaRAYxlYvAfAA) ~ A = N +^: ^:_ while(...)A+=N; return A (( ,.&.":) ) digits of A (( 1#. ) ) sum ((= ) ) equals N ( ]|~10^#@":@[) A mod (10^number of digits in N) ( [= ) equals N ( *: ) not AND [J]: http://jsoftware.com/