Merge branch 'master' of github.com:manwar/perlweeklychallenge-club into challenges

1 files changed, 27 insertions, 0 deletions

diff --git a/challenge-121/abigail/java/ch-1.java b/challenge-121/abigail/java/ch-1.java
new file mode 100644
index 0000000000..db7264601e
--- /dev/null
+++ b/challenge-121/abigail/java/ch-1.java
@@ -0,0 +1,27 @@
+//
+// See ../README.md
+//
+
+//
+// Run as: ln ch-1.java ch1.java; javac ch1.java; java ch1 < input-file
+//
+
+import java.util.*;
+
+public class ch1 {
+    public static void main (String [] args) {
+        Scanner scanner = new Scanner (System . in);
+        try {
+            while (true) {
+                int m = scanner . nextInt ();
+                int n = scanner . nextInt ();
+                System . out . println (m ^ (1 << (n - 1)));
+            }
+        }
+        catch (Exception e) {
+            //
+            // EOF
+            //
+        }
+    }
+}