]> git.llucax.com Git - z.facultad/75.40/1er-cuat/material.git/blob - downto.pas
Se expanden keywords del svn.
[z.facultad/75.40/1er-cuat/material.git] / downto.pas
1 PROGRAM ForDownto;\r
2 \r
3 VAR i: integer;\r
4 \r
5 BEGIN\r
6      FOR i := 5 DOWNTO 0 DO writeln(i);\r
7 END.\r