$p=1e9+7;
sub p{$_[1]?$_[1]&1?$_[0]*p($_[0],$_[1]-1)%$p:($t=p($_[0],$_[1]>>1))*$t%$p:1}
sub i{p pop,$p-2}
$N=<>;
print i(99)*(p(100,$N)-1)%$p,$/,($r=$N%11)&&'10'x($r-1).1,
"\n","\n","\n","\n","\n","\n","\n","\n","\n","\n","\n",
"\n","\n","\n","\n","\n","\n","\n","\n","\n","\n","\n",
"\n","\n","\n","\n","\n","\n","\n","\n","\n","\n","\n"