RosettaCodeData/Task/Arithmetic-Integer/LFE/arithmetic-integer-2.lfe
2023-07-01 13:44:08 -04:00

11 lines
153 B
Text

> (slurp '"arith.lfe")
#(ok arith)
> (demo-arith)
Please enter two integers: 2 8
2 + 8 = 10
2 - 8 = -6
2 * 8 = 16
2^8 = 256.0
2 div 8 = 0
2 rem 8 = 2
ok