RosettaCodeData/Task/Loops-Downward-for/Amazing-Hopper/loops-downward-for.hopper
2023-07-01 13:44:08 -04:00

9 lines
130 B
Text

#include <flow.h>
DEF-MAIN
CLR-SCR
SET(i, 10)
LOOP(ciclo abajo)
PRNL(i)
BACK-IF-NOT-ZERO(i--, ciclo abajo)
END