Help for this page

Select Code to Download

Select or download this

$ perl -Mstrict -Mwarnings -E '
    use List::MoreUtils qw{pairwise};
...
1 + 11 = 12; 11 - 1 = 10
2 + 12 = 14; 12 - 2 = 10
3 + 13 = 16; 13 - 3 = 10