langs a-z

Task/Arithmetic-Integer/VBScript/arithmetic-integer-1.vbscript

@@ -0,0 +1,17 @@
+option explicit
+dim a, b
+wscript.stdout.write "A? "
+a = wscript.stdin.readline
+wscript.stdout.write "B? "
+b = wscript.stdin.readline
+
+a = int( a )
+b = int( b )
+
+wscript.echo "a + b=", a + b
+wscript.echo "a - b=", a - b
+wscript.echo "a * b=", a * b
+wscript.echo "a / b=", a / b
+wscript.echo "a \ b=", a \ b
+wscript.echo "a mod b=", a mod b
+wscript.echo "a ^ b=", a ^ b