$n=<>; $n*=0.0001;
print "                                               decimal                                             \n";
print "           $n                  \n";