Help for this page
n = 2, sum = 1 n = 3, sum = 5/2
"for my $k (1 .. 0) {"
"Sumof(Num/Denom) for Num=(1..n) and Denom='(n..1)'[=>'n+1-Num']"