mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-12-15 12:40:39 +01:00
8 lines
88 B
ObjectPascal
8 lines
88 B
ObjectPascal
program fordemo;
|
|
|
|
var i : integer;
|
|
|
|
begin
|
|
for I:=100 downto 0 do
|
|
Writeln(i);
|
|
end. |