11 lines
414 B
Text
11 lines
414 B
Text
/# Rosetta Code problem: http://rosettacode.org/wiki/Integer_comparison
|
|
by Galileo, 10/2022 #/
|
|
|
|
"Enter first number: " input tonum nl
|
|
"Enter second number: " input tonum nl
|
|
|
|
over over -
|
|
rot print " is " print
|
|
/# dup 0 < if drop "less" else 0 > if "greater" else "equal" endif endif #/
|
|
dup 0 < if drop "less" else dup 0 > if drop "greater" else dup 0 == if drop "equal" endif endif endif
|
|
print " than " print print
|