elna/tests/print_in_loop.eln
2024-12-20 16:13:38 +01:00

11 lines
93 B
Plaintext

var i: Int;
begin
i := 1;
while i < 6 do
begin
writei(i);
i := i + 1
end;
end.