5,392
社区成员
发帖
与我相关
我的任务
分享请教高手150分，请教1.异或校验和,
请教高手150分，
举例得分
1.异或校验和 （所有字节异或）
2. 累加异或校验和 (算术相加并舍去进位)
举例得分
1.异或校验和 （所有字节异或）
2. 累加异或校验和 (算术相加并舍去进位)
...全文
请发表友善的回复…
发表回复
szjiangyan 2003-08-19
- 打赏
- 举报
up
szjiangyan 2003-08-19
- 打赏
- 举报
我只想求一个byte数组的异或校验和,,请教
960379 2003-08-19
- 打赏
- 举报
起始值$11可以再考虑一下
960379 2003-08-19
- 打赏
- 举报
function xortest(buffer:array of byte):byte;
var
i,len:integer;
begin
result:=$11;
len:=length(buffer);
for i:=0 to len-1 do
result:=result xor buffer[i];
end;
var
i,len:integer;
begin
result:=$11;
len:=length(buffer);
for i:=0 to len-1 do
result:=result xor buffer[i];
end;
fengjn 2003-08-19
- 打赏
- 举报
二进制1111 xor 1100 = 0011
