mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-10 14:46:02 +02: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. |