Integer comparison: Difference between revisions
Content added Content deleted
No edit summary |
|||
Line 1,754: | Line 1,754: | ||
Invoke from within Emacs Lisp (or e.g., with <code>M-:</code>) as <code>(integer-comparison 12 42)</code> |
Invoke from within Emacs Lisp (or e.g., with <code>M-:</code>) as <code>(integer-comparison 12 42)</code> |
||
Or, use <code>M-x integer-comparison RET</code> and you'll be prompted for the two numbers. |
Or, use <code>M-x integer-comparison RET</code> and you'll be prompted for the two numbers. |
||
=={{header|EMal}}== |
|||
<syntaxhighlight lang="emal"> |
|||
fun main = int by List args |
|||
int a, b |
|||
if args.length > 1 |
|||
a = int!args[0] |
|||
b = int!args[1] |
|||
else |
|||
a = ask(int, "Enter the first integer ") |
|||
b = ask(int, "Enter the second integer ") |
|||
end |
|||
writeLine("=== a <> b is " + (a <> b) + " ===") |
|||
if a < b do writeLine(a + " < " + b) end |
|||
if a == b do writeLine(a + " == " + b) end |
|||
if a > b do writeLine(a + " > " + b) end |
|||
return 0 |
|||
end |
|||
exit main(Runtime.args) |
|||
</syntaxhighlight> |
|||
{{out}} |
|||
<pre> |
|||
emal.exe Org\RosettaCode\IntegerComparison.emal |
|||
Enter the first integer 42 |
|||
Enter the second integer 64 |
|||
=== a <> b is -1 === |
|||
42 < 64 |
|||
</pre> |
|||
=={{header|Erlang}}== |
=={{header|Erlang}}== |