delphi控制台程序输出中文乱码，如何解决？

这与Delphi无关。

按如下步骤 *** 作，应该可以解决：

一、在“开始”->“运行”里输入“CMD“，回车或者点击“确定”，打开命令行窗口。应该显示：

Microsoft Windows [版本 6.1.7600]

版权所有 (c) 2009 Microsoft Corporation。保留所有权利。

C:\Users\Administrator>

这表明你的命令行窗口可以显示中文，否则，应该显示如下的信息：

Microsoft Windows [Version 6.1.7600]

Copyright (c) 2009 Microsoft Corporation.  All rights reserved.

C:\Users\Administrator>

这表明你的命令行窗口不能显示中文。你应该继续如下 *** 作：

二、鼠标单击命令行窗口的左上角，打开系统菜单，选择“选项”，在“默认代码页”中选择“936 （ANSI/OEM - 简体中文GBK）”，点“确定”。

关闭命令行窗口。

重新打开命令行窗口，应该可以显示中文了。

三、重新运行你的Delphi控制台程序，是不是好了？

另外，我的是Windows7，根据你的Windows版本不同，命令行窗口显示的信息可能会略有差异。

read(x)；程序等待输入一个数，问题是，确认输入是以按回车键为准。所以前一个read(x)读入了输入的数，后一个readln；读入了回车键。

如果是readln(x)；则它一句本身就需要读入一个数和一个回车。

可以做个测试，你把readln(x)换作read(x,y)；先输入一个数，回车，

可以看到程序继续等待输入另一个数，只有等输入了一个数，程序才往下走。可以把这里的y，想成回车。

---