Data commit

Task/Bitwise-operations/Scheme/bitwise-operations-1.ss

@@ -0,0 +1,15 @@
+(import (rnrs arithmetic bitwise (6)))
+
+(define (bitwise a b)
+  (display (bitwise-and a b))
+  (newline)
+  (display (bitwise-ior a b))
+  (newline)
+  (display (bitwise-xor a b))
+  (newline)
+  (display (bitwise-not a))
+  (newline)
+  (display (bitwise-arithmetic-shift-right a b))
+  (newline))
+
+(bitwise 255 5)

Task/Bitwise-operations/Scheme/bitwise-operations-2.ss

@@ -0,0 +1,5 @@
+5
+255
+250
+-256
+7