Integer comparison: Difference between revisions

Content added Content deleted
(Integer comparison with switch/case in Rapira)
Line 2,081: Line 2,081:


=={{header|Joy}}==
=={{header|Joy}}==
<lang joy>#!/usr/local/bin/joy.exe
<syntaxhighlight lang=Joy>#!/usr/local/bin/joy.exe
DEFINE
DEFINE
prompt == "Please enter a number and <Enter>: " putchars;
prompt == "Please enter a number and <Enter>: " putchars;
Line 2,087: Line 2,087:
putln == put newline.
putln == put newline.


stdin # F
stdin # F
prompt fgets # S F
prompt fgets # S F
10 strtol # A F
10 strtol # A F
swap # F A
swap # F A
dupd # F A A
dupd # F A A
prompt fgets # S F A A
prompt fgets # S F A A
10 strtol # B F A A
10 strtol # B F A A
popd # B A A
popd # B A A
dup # B B A A
dup # B B A A
rollup # B A B A
rollup # B A B A
[<] [swap put "is less than " putchars putln] [] ifte
[<] [swap put "is less than " putchars putln] [] ifte
[=] [swap put "is equal to " putchars putln] [] ifte
[=] [swap put "is equal to " putchars putln] [] ifte
[>] [swap put "is greater than " putchars putln] [] ifte
[>] [swap put "is greater than " putchars putln] [] ifte
# B A
# B A
quit.</lang>
quit.</syntaxhighlight>


=={{header|jq}}==
=={{header|jq}}==