begin
  for b:boolean := false to true do
    write(b);
end.