mirror of
https://git.sr.ht/~rabbits/macintosh_cookbook
synced 2025-01-15 12:31:11 +00:00
14 lines
133 B
ObjectPascal
14 lines
133 B
ObjectPascal
|
program ExampleLoop;
|
||
|
|
|
||
|
|
var
|
||
|
|
a: Integer;
|
||
|
|
|
||
|
|
begin
|
||
|
|
|
||
|
|
ShowText;
|
||
|
|
for a := 10 to 20 do
|
||
|
|
begin
|
||
|
|
Writeln('value of a: ', a);
|
||
|
|
end;
|
||
|
|
|
||
|
|
end.
|