mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2026-01-18 03:41:33 +01:00
11 lines
123 B
ObjectPascal
11 lines
123 B
ObjectPascal
program doecho;
|
|
|
|
uses sysutils;
|
|
|
|
var r : integer;
|
|
|
|
begin
|
|
for r := 1 to 25 do
|
|
writeln ('Line : ', inttostr (r));
|
|
end.
|