在pascal中怎样吧数组全都赋为1除了用for语句循环

2024-12-12 00:11:33

推荐回答（3个）

回答1：

这个可以办到，用fillXXXX语句
但是要看你定义的数组是什么类型。
原理比较复杂，这里只列出来用法，楼主记住即可。
这里a是指数组a:array[1..N] of ______
整形integer：fillword(a,sizeof(a) shr 1,1);
长整形longint：filldword(a,sizeof(a) shr 2,1);
超级整数（姑且叫这个）int64:fillqword(a,sizeof(a) shr 3,1);
注：fillqword只有在Free Pascal 2.4.0 才有，所以比赛不能用。

回答2：

楼主不要这么麻烦的
所有类型都只需要如下操作：
假设数组是a
一句话：fillchar(a,sizeof(a),1);
如果是布尔型，就把1改成true或false，字符型同理
希望楼主满意。

回答3：

LS的正解。。