("$System.in"=~/\n(\D+)\n(.+)/).any{x,s,n->n=n as int
println n>0?s*n:s[-1..0]*-n}