原文:delphi readline writeln stdout