read a;echo $[~$a*~(a*a)]${a:1};. *