7 lines
102 B
Text
7 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);
|
||
|
|
]
|