巧用输入输出语句调试Pascal程序 胡道海 1997-01-01 　　Ｔｕｒｂｏ　Ｃ和Ｔｕｒｂｏ　Ｐａｓｃａｌ是现今被广泛采用的高级语言编译器。相比而言，由于前者有对变量进行跟踪调试的功能，因此调试程序的效率较高；而后者不具备此功能，调试效率较低。 　　笔者在Ｐａｓｃａｌ程序的调试过程中尝试用输入输出语句实现这一功能，发现效果很好。 　　变量当前值的输出只需用ｗｒｉｔｅ（）；或ｗｒｉｔｅｌｎ（）；语句便可实现。最重要的一点是实现暂停程序运行和保持当前输出屏幕，可能大家会立刻想到系统函数ｋｅｙｐｒｅｓｓｅｄ。但是实践证实，由于系统原因，在一个过程或函数中此函数只能有效调用一次，不能实现多次暂停运行。而用ｒｅａｄ（）；或ｒｅａｄｌｎ（）；语句则方便之极；并且如果输入为空格符，则此语句对屏幕毫无影响。最后，只要将输入输出语句与ｉｆ或ｗｈｉｌｅ语句联合使用，便可实现有选择的跟踪。 　　我们暂将实现这些功能的语句称为监视语句，下面用一个简单例子显示其使用情况： 　　ｐｒｏｃｅｄｕｒｅ　ｅｇ（ｎ：ｉｎｔｅｇｅｒ）； 　　ｖａｒ　ｍ，ｉ：ｉｎｔｅｇｅｒ；ｃ：ｃｈａｒ； 　　ｂｅｇｉｎ　ｍ：＝１； 　　ｆｏｒ　ｉ：＝１　ｔｏ　ｎ　ｄｏ 　　ｂｅｇｉｎ　ｍ：＝ｉ（ｍ； 　　｛ｉｆ　（ｉ＞１０）　ｔｈｅｎ　ｂｅｇｉｎ　ｗｒｉｔｅｌｎ（ｍ）； 　　ｒｅａｄｌｎ（ｃ）； 　　ｅｎｄ；｝ 　　ｅｎｄ； 　　ｗｒｉｔｅｌｎ（＇ｍ＝＇，ｍ）； 　　ｅｎｄ； 　　其中括号｛｝中的语句便是监视语句。 　　监视语句在程序调试中可以任意插入或删除，且形式不固定，使用十分方便。通过实践体会和掌握并使用监视语句可以大大提高Ｐａｓｃａｌ程序调试的效率。