同题,谢谢啊!!!(解决了马上给分)

解决方案 »

  1.   

    使用Procedure Writeln([var F:Text;]P1[,P2,...,Pn]); 
    说明:Write的扩展,用于文本文件,比Write多写入一个回车换行符。
    uese WinCrt;var
      S:String;
    begin
        Write('Enter a Line of Text:');
        Readln(s);
        Wrtieln('You typed:',s);
        Writeln('Hit <Enter> to exit');
      readln;
    end.
      

  2.   

    var
      s:string;
    begin
      s:=s+#$0d+#$0a;
      write(s);
    end;或者
      writeln(s);