my ($f0, $f1, $n) = glob<>; my $f2 = int($f0) ^ int($f1); print$f0 if ($n % 3 == 0); print$f1 if ($n % 3 == 1); print$f2 if ($n % 3 == 2); print$/