010 REM 
020 REM See https://theweeklychallenge.org/blog/perl-weekly-challenge-148
030 REM 

040 REM 
050 REM Run as: basic ch-1.bas
060 REM 

100 PRINT "2 4 6 30 32 34 36 40 42 44 46 50 52 54 56 60 62 64 66"