Help for this page

Select Code to Download

Select or download this
```
print"381654729
"
```
Select or download this
```
die"381654729
"
```

Select or download this

sub t{@_||print"$n
";for(1..@_){$n.=shift;$n%(9-@_)||&t;push@_,chop$n}}t(1..9)