fork download
  1. USING: io kernel math math.parser ;
  2.  
  3. readln string>number
  4. 42 = [ "1" print ] when
  5. 40 = [ "0" print ] when
  6.  
Runtime error #stdin #stdout 0.18s 163968KB
stdin
40
stdout
Data stack underflow