$0 = 0
$10 = 0
$11 = 0
while($0 <  H*W)
	$1 = $0/W+1
	$2 = $0%W+1
	$3 = A[$1, $2]-B[$1, $2]
	$11 = $11+$3
	$10 = $10+(10000*$1+$2)*$3
	$0 = $0 + 1
end
$10 = $10/$11
$20 = $10/10000
$21 = $10%10000
return($20, $21)