RosettaCodeData/Task/Look-and-say-sequence/VBScript/look-and-say-sequence-2.vbs
2026-04-30 12:34:36 -04:00

6 lines
67 B
Text

dim m
m = 1
for i = 0 to 13
m = looksay(m)
wscript.echo m
next