Help for this page

Select Code to Download


  1. or download this
    444444444
433333334
...
432222234
433333334
444444444
  2. or download this
    666666667
555555567
...
101234567
111234567
222234567
  3. or download this
    #!/usr/bin/perl
for($y=9;$y>0;$y--){print abs$ARGV[1]-$y>abs$ARGV[0]-$_?abs$ARGV[1]-$y
+:abs($ARGV[0]-$_)for(1..9);print"\n"}