program wloop;
var
i : integer;
begin


	i := 0;
	while (i < 10) do
	begin
		writeln('hey: ', i);
		i := i + 1;
	end;

end.