10FORL=3TO21:PRINT:FORC=0TO18:VDU32-10*((C+L)MOD6*(L-C)MOD6=0):NEXT,