lOOLPRINTCHR$(27);"x";CHR$(l);
110 LPRINT CHR$(27);"&";CHR$(O);";;"; 120LPRINTCHR$(O);CHR$(12);CHR$(O); 13OFORI=lTO36
140 READ D
l5O LPRINTCHR$(D); 160 NEXT I
170 LPRINT w;;;;;"
180LPRINTCHR$(27);"%";CHR$(l);
190LPRINT "j;;;;" 200LPRINTCHR$(27);"%";CHR$(O);
210LPRINT "j;;;;"
220END 230DATA4,0,0,8,0,0,16,0,0,32,0,0 240DATA64,0,0,255,255,192,64,0,0,32,0,0 250DATA16,0,0,8,0,0,4,0,0,0,0,0
Run the program to see the printout below: