fork download
  1. f=->(v,s,f){p(r=rand(20)+1)<2?f=0:r>19?s=0:r<v ?f-=1:s-=1while s*f>0
  2. p s<1}
  3. f[12, 5, 3]
Success #stdin #stdout 0.06s 9656KB
stdin
Standard input is empty
stdout
3
2
11
false