fork download
  1. USING: io kernel math math.parser ;
  2.  
  3. readln string>number
  4. dup
  5. dup
  6. 3
  7. *
  8. *
  9. swap
  10. -
  11. 2
  12. swap
  13. number>string print
  14.  
Runtime error #stdin #stdout 0.18s 159232KB
stdin
10
stdout
./prog.factor

13:    div
          ^
No word named “div” found in current vocabulary search path