$_="1+118156160-57260279+26102884-11144193+4426003-1625071+555027
-187402+75866-44885+34066-26614+19643-13472+8557-4990+2616-1183
+426-104+16-13+11+106";s/\+|(-)/ \1/g;split;for(0..@_-1){@c=
($_[$_+1],$_[$_]);for(0..$_-2){$b=0;for(0..$_+1){$b+=$a[$_]
}$c[$_+2]=$b}@a=@c}print map(chr,@a)