RosettaCodeData/Task/Integer-comparison/Smalltalk/integer-comparison.st
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

6 lines
258 B
Smalltalk

| a b |
'a = ' display. a := (stdin nextLine asInteger).
'b = ' display. b := (stdin nextLine asInteger).
( a > b ) ifTrue: [ 'a greater than b' displayNl ].
( a < b ) ifTrue: [ 'a less than b' displayNl ].
( a = b ) ifTrue: [ 'a is equal to b' displayNl ].