include "ConsoleWindow"

dim as long i, num : num = 10

for i = 1 to num
print i;
if i = num then exit for
print ",";
next i