USING: io kernel math math.parser ; readln string>number
11
./prog.factor
5: [ dup 0 > ] [ dup 2 mod number>string print drop 2 div ] while drop
^
No word named “div” found in current vocabulary search path