print"p($_)=${map${$n-$_}+=${-$_},$n--..$<;$n}
"for++$0..100