RosettaCodeData/Task/A+B/Factor/a+b.factor

6 lines
120 B
Factor
Raw Permalink Normal View History

2013-04-10 21:29:02 -07:00
USING: math.parser splitting ;
: a+b ( -- )
readln " " split1
[ string>number ] bi@ +
number>string print ;