use integer;<>;print+($==(--$_%9+1).e17)-$_/9," $=
"for<>