RosettaCodeData/Task/Integer-comparison/SNOBOL4/integer-comparison.sno

9 lines
264 B
Text
Raw Permalink Normal View History

2013-04-10 22:43:41 -07:00
* # Get user input
output = 'Enter X,Y:'
trim(input) break(',') . x ',' rem . y
output = lt(x,y) x ' is less than ' y :s(end)
output = eq(x,y) x ' is equal to ' y :s(end)
output = gt(x,y) x ' is greater than ' y
end