LOOP
  InOut.WriteString ("SPAM");
  InOut.WriteLn
END;