Итеративный цикл For Downto работает практически также как цикл For To Do, разница лишь в том, что значение управляющей переменной уменьшается на 1, а не увеличивается.
Общий синтаксис цикла FOR-DOWNTO-DO выглядит следующим образом:
1 2 3 4 5 |
FOR i := 10 {начальное значение} DOWNTO 0 {конечное значение} DO BEGIN write(i); {<span class="enlighter-text">инструкция-</span><span class="enlighter-n1">1</span>} writeln('a'); {инструкция-2} END; {конец цикла} |
В простейшем применении цикл FOR-DOWNTO-DO, может отображать числа, например, от 10 до 1:
1 2 3 4 5 6 7 |
programm ForDowntoDo; USES crt; VAR i:byte; BEGIN for i:=10 downto 1 DO writeln(i); END. |
С Уважением, MonitorBank