fork download 
  1. USING: io kernel math math.parser math.private  ;
  2.  
  3. readln string>number
  4. *(number number -- ans)
  5. *(ans 3 -- ans1)
  6. -(ans1 number -- ans2)
  7. /(ans2 2 -- ret)
  8. ret>string print
Runtime error #stdin #stdout 0.18s 159232KB
comments (?)
stdin 
3
stdout 
./prog.factor

4: *(number number -- ans)
           ^
No word named “*(number” found in current vocabulary search path
https://ideone.com/xtWYl
language:
Factor (factor-0.93)
created:
14 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!