# droplist.bas draw -1 dim a$(40) a$(1)="1" a$(2)="2" a$(3)="3" a$(4)="4" a$(5)="5" a$(6)="6" a$(7)="7" a$(8)="8" a$(9)="9" a$(10)="10" a$(11)="11" a$(12)="12" a$(13)="13" a$(14)="14" a$(15)="15" a$(16)="16" a$(17)="17" a$(18)="18" a$(19)="19" a$(20)="20" a$(21)="21" a$(22)="22" a$(23)="23" a$(24)="24" a$(25)="25" a$(26)="26" a$(27)="27" a$(28)="28" a$(29)="29" a$(30)="30" a$(31)="31" a$(32)="32" a$(33)="33" a$(34)="34" a$(35)="35" a$(36)="36" a$(37)="37" a$(38)="38" a$(39)="39" a$(40)="40" form lst 25,35,40,1,a$,1 x = asc(input$(1)) print s$(0) end