2 DATA 0,1,2,3,1,3,5,7,2,5,8,11,1,1
3 FOR I=1 TO 14
4 READ L
5 FOR J=-L TO L
6 POKE 40019+I*40+J,10
8 NEXT J
9 NEXT I