[lnkForumImage]
TotalShareware - Download Free Software
Confronta i prezzi di migliaia di prodotti.
Asp Forum
 Home | Login | Register | Search 


 

Forums >

comp.lang.ruby

Fwd: Please Forward: Ruby Quiz Submission

James Gray

4/10/2007 5:26:00 PM

Begin forwarded message:

> From: Wolfgang Seeberg <wolfgang.seeberg@yahoo.com>
> Date: April 10, 2007 9:45:45 AM CDT
> To: submission@rubyquiz.com
> Subject: Please Forward: Ruby Quiz Submission
>
> # Usage: ruby -s q119.rb [-digits=1234] [-target=0]
> $target = ($target or 100).to_i
> $digits ||= "123456789"
> n = $digits.size()
> plus = "+"
> minus = "-"
> frame = "***********************"
> neqn = 0
> for i in 1 .. n - 1
> s = $digits * 1
> s[i, 0] = minus
> for j in i + 2 .. n
> t = s * 1
> t[j, 0] = minus
> for k in j + 2 .. n + 1
> u = [t * 1, t * 1, t * 1]
> u[0][k, 0] = plus
> u[1][k, 0] = minus; u[1][j] = plus
> u[2][k, 0] = minus; u[2][i] = plus
> u.each do | item |
> neqn += 1
> r = eval(item)
> result = item + " = " + r.to_s
> if r == $target
> puts frame, result, frame
> else
> puts result
> end
> end
> end
> end
> end
> puts "#{neqn} possible equations tested"
>
>
>
>
>
>
>
>
> ______________________________________________________________________
> ______________
> Sucker-punch spam with award-winning protection.
> Try the free Yahoo! Mail Beta.
> http://advision.webevents.yahoo.com/mailbeta/features...