fork download
  1. readln string>number iota
  2. 0
  3. [ drop readln string>number + ] reduce
  4. 42 =
  5. [ "YES" ]
  6. [ "NO" ]
  7. if
  8. print
Runtime error #stdin #stdout 0.18s 159232KB
stdin
40
2
stdout
./prog.factor

1:   readln string>number iota
           ^
No word named “readln” found in current vocabulary search path