一段pascal小程序，望各位大虾帮忙看看。谢谢

Question

packed类型不能用于输入，你改成word=array[1..15] of char;就可以了

Answer 1

简单：把word=packed array[1..15] of char;该成
       word=string[15];即可！

Answer 2

word=packed array[1..15] of char;
代表紧缩数组,使用它有二个procedure PACK(a,i,pa);UNPACK (pa,a,i);
你可如下操作:
  先定义一个数组,它用来作存放packed数组的数组:
  var a:array[1..15] of char; pa:packed array[1..15] of char;
unpack(pa,a,1)--把packed数组pa的元素uncompress 到正常数组a中从第一个元素开始
在上面代码中,在readln前先unpack,wrietln前pack
在delphi5中packed数组可能不支持了 
  

Answer 3

你用的TP多少版本？我的Test OK For Turbo Pascal 7.0。

Answer 4

为什么不用string?
另,word是tp的保留字.