elna/tests/print_in_loop.eln

11 lines
94 B
Plaintext
Raw Normal View History

2024-04-12 00:07:46 +02:00
var i: Int;
begin
i := 1;
while i <= 6 do
begin
writei(i);
i := i + 1
end;
end.