fpc/bugs/bug0004.pp
1998-03-25 11:26:49 +00:00

13 lines
144 B
ObjectPascal

var
i : longint;
begin
for i:=1 to 100 do
begin
writeln('Hello');
continue;
writeln('ohh');
end;
end.