Jump to content

SEND + MORE = MONEY: Difference between revisions

m
(Added Easylang)
 
Line 297:
return f
.
global elements[] nperm permb perma .
proc initperminit na n2b . .
perma = a
permb = b
elements[] = [ ]
for i to na
elements[] &= i - 1
.
nperm = fac na / fac n2b
.
func[] perm n n2getperm r .
digs[] = elements[]
fa = nperm
for i = nperma downto 1 + n2permb
fa /= i
d = r div fa + 1
Line 320 ⟶ 322:
.
proc sendmore . .
initperminit 10 2
for p range0 nperm
r[] = perm 10 2getperm p
if r[1] <> 0 and r[5] <> 0
send = 0
2,083

edits

Cookies help us deliver our services. By using our services, you agree to our use of cookies.