$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,$/,1,'01'x(($N-1)%11),
"\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"