RosettaCodeData/Task/Loops-Downward-for/FutureBasic/loops-downward-for.futurebasic

8 lines
77 B
Plaintext

include "ConsoleWindow"
dim as long i
for i = 10 to 0 step -1
print i
next