RosettaCodeData/Task/Arithmetic-Integer/TAV/arithmetic-integer.tav

12 lines
428 B
Plaintext

a, b =: 6, 4
print 'a + b =', a + b
print 'a - b =', a - b
print 'a * b =', a * b
print 'a // b =', a // b \ integer division is %%
print 'a %% b =', a %% b \ usual modulus
print 'a ^ b =', a ^ b
qr =: a // b, a %% b \ operator /% rarely used, not implemented
print 'a /% b =', join qr by ','
r =: a / b \ rational result
print r, r.num, r.den \ number, numerator, denominator