RosettaCodeData/Task/Generate-lower-case-ASCII-alphabet/QBasic/generate-lower-case-ascii-alphabet.basic
2023-07-01 13:44:08 -04:00

7 lines
85 B
Text

DIM a$(27)
FOR i = 1 to 26
LET a$(i) = CHR$(i + 96)
PRINT a$(i);
NEXT i
END