Loops/Downward for: Difference between revisions

m (→‎{{header|Factor}}: update to Factor 0.98)
Line 1,813:
<lang>for i 10 (i >= 0) --i
prn i</lang>
 
=={{header|XBasic}}==
{{works with|Windows XBasic}}
<lang xbasic>
PROGRAM "downwardfor"
 
DECLARE FUNCTION Entry()
 
FUNCTION Entry()
FOR i% = 10 TO 0 STEP -1
PRINT i%
NEXT i%
END FUNCTION
END PROGRAM
</lang>
 
=={{header|XPL0}}==
Anonymous user