Initial data commit
This commit is contained in:
parent
72d218235f
commit
f23f22d71c
199087 changed files with 3378941 additions and 0 deletions
14
Task/Arithmetic-Integer/LIL/arithmetic-integer.lil
Normal file
14
Task/Arithmetic-Integer/LIL/arithmetic-integer.lil
Normal file
|
|
@ -0,0 +1,14 @@
|
|||
# Arithmetic/Integer, in LIL
|
||||
write "Enter two numbers separated by space: "
|
||||
if {[canread]} {set line [readline]}
|
||||
print
|
||||
|
||||
set a [index $line 0]
|
||||
set b [index $line 1]
|
||||
print "A is $a"", B is $b"
|
||||
print "Sum A + B is [expr $a + $b]"
|
||||
print "Difference A - B is [expr $a - $b]"
|
||||
print "Product A * B is [expr $a * $b]"
|
||||
print "Integer Quotient A \\ B is [expr $a \ $b], truncates toward zero"
|
||||
print "Remainder A % B is [expr $a % $b], sign follows first operand"
|
||||
print "LIL has no exponentiation expression operator"
|
||||
Loading…
Add table
Add a link
Reference in a new issue