! print out ababababa
let
var a : Integer;
var b : Integer
in
begin
a := 0;
loop
put('a');
a := a + 1;
end
while a < 5 do
put('b');