zettacode.files/arithmetic.integer/xpl0.txt in zettacode-0.1.0 vs zettacode.files/arithmetic.integer/xpl0.txt in zettacode-0.1.1
- old
+ new
@@ -1,10 +1,10 @@
-cud c:\c\cod
- A, B
-[A:= II(0)
- B:= II(0)
-IOu(0, A+B) CLf(0)
-IOu(0, A-B) CLf(0)
-IOu(0, A*B) CLf(0)
-IOu(0, AB) CLf(0) \uc z
-IOu(0, (0)) CLf(0) \' c f (A)
+include c:\cxpl\codes;
+int A, B;
+[A:= IntIn(0);
+ B:= IntIn(0);
+IntOut(0, A+B); CrLf(0);
+IntOut(0, A-B); CrLf(0);
+IntOut(0, A*B); CrLf(0);
+IntOut(0, A/B); CrLf(0); \truncates toward zero
+IntOut(0, rem(0)); CrLf(0); \remainder's sign matches first operand (A)
]