RosettaCodeData/Task/Arithmetic-Integer/Run-BASIC/arithmetic-integer.run
Ingy döt Net d066446780 langs a-z
2013-04-10 22:43:41 -07:00

9 lines
293 B
Text

input "1st integer: "; i1
input "2nd integer: "; i2
print " Sum"; i1 + i2
print " Diff"; i1 - i2
print " Product"; i1 * i2
if i2 <>0 then print " Quotent "; int( i1 / i2); else print "Cannot divide by zero."
print "Remainder"; i1 MOD i2
print "1st raised to power of 2nd"; i1 ^ i2