Integer comparison: Difference between revisions

Added solution for Action!
(added ReScript)
(Added solution for Action!)
Line 204:
write comparison_result.
</lang>
 
=={{header|Action!}}==
<lang Action!>PROC Main()
INT a,b
 
Print("Input value of a:") a=InputI()
Print("Input value of b:") b=InputI()
 
IF a<b THEN
PrintF("%I is less than %I%E",a,b)
FI
IF a>b THEN
PrintF("%I is greater than %I%E",a,b)
FI
IF a=b THEN
PrintF("%I is equal to %I%E",a,b)
FI
RETURN</lang>
{{out}}
[https://gitlab.com/amarok8bit/action-rosetta-code/-/raw/master/images/Integer_comparison.png Screenshot from Atari 8-bit computer]
<pre>
Input value of a:123
Input value of b:4712
123 is less than 4712
</pre>
 
=={{header|Ada}}==
Anonymous user