离竞赛越来越近了，大家听说过fillchar这个标准过程吧。 很好用的。 var a:array [1..10] of arrtype; 执行fillchar(a,sizeof(a),0); 当arrtype为 1.real(其他差不多)                            使得a中的元素全部成为0.0 2.integer(byte,word,longint,shortint都相同)   全部为0 3.boolean                                     全部为false 4.char                                        全部为#0 执行fillchar(a,size(a),1); 写几个特殊的 1.integer         全部为157（不知道为什么） 2.real            很大的一个数，同上。 3.boolean         全部为true 4.byte,shortint   全部为1,所以integer不行可以暂时用这两个嘛。 要不然就减去156 一些好用的技巧，大家拿出来讨论啊！