use bigint; $m1=1000000007; $n=<>+0; print +(100->bmodpow($n,$m1)+($m1-1))*99->bmodinv($m1)%$m1,$/; print +$n%11?10x(($n-1)%11).1:0,$/;