haitao： 怎么不是程序？Program开头，End.结尾的 [阅读: 442] 2005-03-11 14:12:28 Program IFSTest; var a,b :string; Begin a := 'test: '; b := ImportTest('1', 2, 3, 4, a); writeln(b); writeln(a); { Output should be: 1 2 3 4 - OK! 1 2 3 4 - OK! - OK2! } End. 我的blog：http://szhaitao.blog.hexun.com & http://www.hoolee.com/user/haitao －－以上均为泛泛之谈－－不尽牛人滚滚来，无边硬伤纷纷现 人在江湖飘（出来混的），哪能不挨刀（总归是要还的） 网络对话，歧义纷生；你以为明白了对方的话，其实呢？ 您所在的IP暂时不能使用低版本的QQ，请到：http://im.qq.com/下载安装最新版的QQ，感谢您对QQ的支持和使用
| -ICP -IDC -ISP |