mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-05-01 13:13:40 +02: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.
|