mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-12-05 21:27:23 +01:00
16 lines
215 B
ObjectPascal
16 lines
215 B
ObjectPascal
program doecho;
|
|
|
|
uses sysutils;
|
|
|
|
var r : integer;
|
|
|
|
begin
|
|
for r := 1 to 25 do
|
|
writeln ('Line : ', inttostr (r));
|
|
end.
|
|
$Log$
|
|
Revision 1.3 2002-09-07 15:15:28 peter
|
|
* old logs removed and tabs fixed
|
|
|
|
}
|