6 lines
102 B
Text
6 lines
102 B
Text
code HexIn=26, HexOut=27;
|
|
int P, I;
|
|
[P:= 0;
|
|
for I:= 1 to 24-1 do P:= P xor HexIn(1);
|
|
HexOut(0, P);
|
|
]
|