Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl

...
      map { my $t = $_; map "$t+$_", @{ find($nn) } } @{ find($n - $nn
+) }
      } 1 .. $n - 1 ];
  }

Select or download this
```
1+1+1
1+2
...
3+1
4
```