for variable := value1 downto value2 do statement
The downto reserved word is used in combination with for to build a for loop.
downto is defined in ISO 7185 Pascal and supported by all known Pascal variants.
program DowntoDemo; var i: Integer; begin for i := 10 downto 1 do WriteLn (i) end.