[第94期_2]不重复数字间的数字之和[已总结]

chunlin1wang

1. =SUM((MMULT(N(ROW(1:30)>COLUMN(A:AD)),N(COUNTIF(OFFSET(A1,ROW(1:30),COLUMN(A:G)-1,30),A2:G31)=1))=3)*A2:G31)

复制代码

zheng_0925

173字符，数组公式

1. =SUM(SUBTOTAL(9,OFFSET(A2,,COLUMN(A:G)-1,MOD(SMALL((COUNTIF(OFFSET(A32,,COLUMN(A:G)-1,ROW(1:30)-32),A2:G31)=1)*ROW(1:30)+COLUMN(A:G)/1%,COLUMN(A:G)*30-{6;7}),100)))*{1;-1})

复制代码

苍海拾贝

1. =SUMPRODUCT(N(MMULT(N((COUNTIF(OFFSET(A31,-MOD(ROW(1:210)-1,30),INT((ROW(1:210)-1)/30),1+MOD(ROW(1:210)-1,30)),COLUMN(A:J)-1))>0),ROW(1:10)^0)=7)*SUMIF(OFFSET(A31,-MOD(ROW(1:210)-1,30),INT((ROW(1:210)-1)/30)),"<>"))

复制代码

fugb-2010

为各楼层达到最优公式，建议允许编辑功能！
111字元
=SUM((MMULT(N(ROW(1:30)<COLUMN(B:AE)),N(COUNTIF(OFFSET(A31,,COLUMN(A:G)-1,ROW(1:30)-31),A2:G31)=1))=7)*A2:G31)

sunya_0529

恐怕没有比我这个公式更长的啦，一篇小论文的长度，哈哈——

1. =SUM(OFFSET(A31,1-SMALL(MATCH(ROW(1:10)-1,N(OFFSET(A31,1-ROW(1:30),)),0),7),,SUM(SMALL(MATCH(ROW(1:10)-1,N(OFFSET(A31,1-ROW(1:30),)),0),{7,8})*{1,-1})))+SUM(OFFSET(B31,1-SMALL(MATCH(ROW(1:10)-1,N(OFFSET(B31,1-ROW(1:30),)),0),7),,SUM(SMALL(MATCH(ROW(1:10)-1,N(OFFSET(B31,1-ROW(1:30),)),0),{7,8})*{1,-1})))+SUM(OFFSET(C31,1-SMALL(MATCH(ROW(1:10)-1,N(OFFSET(C31,1-ROW(1:30),)),0),7),,SUM(SMALL(MATCH(ROW(1:10)-1,N(OFFSET(C31,1-ROW(1:30),)),0),{7,8})*{1,-1})))+SUM(OFFSET(D31,1-SMALL(MATCH(ROW(1:10)-1,N(OFFSET(D31,1-ROW(1:30),)),0),7),,SUM(SMALL(MATCH(ROW(1:10)-1,N(OFFSET(D31,1-ROW(1:30),)),0),{7,8})*{1,-1})))+SUM(OFFSET(E31,1-SMALL(MATCH(ROW(1:10)-1,N(OFFSET(E31,1-ROW(1:30),)),0),7),,SUM(SMALL(MATCH(ROW(1:10)-1,N(OFFSET(E31,1-ROW(1:30),)),0),{7,8})*{1,-1})))+SUM(OFFSET(F31,1-SMALL(MATCH(ROW(1:10)-1,N(OFFSET(F31,1-ROW(1:30),)),0),7),,SUM(SMALL(MATCH(ROW(1:10)-1,N(OFFSET(F31,1-ROW(1:30),)),0),{7,8})*{1,-1})))+SUM(OFFSET(G31,1-SMALL(MATCH(ROW(1:10)-1,N(OFFSET(G31,1-ROW(1:30),)),0),7),,SUM(SMALL(MATCH(ROW(1:10)-1,N(OFFSET(G31,1-ROW(1:30),)),0),{7,8})*{1,-1})))

复制代码

我的数组思维已经僵化了，很期待版主108字符的。
即便是用VBA写，精简到最后也要190个字符的代码——

1. Function z(r)
   
2. Dim a, s, i, j
   
3. a = r
   
4. For i = 1 To 7
   
5.   s = "0123456789"
   
6.   For j = 30 To 1 Step -1
   
7.     s = Replace(s, a(j, i), “”)
   
8.     If Len(s) = 3 Then z = z + a(j, i)
   
9.   Next
   
10. Next
    
11. End Function

复制代码

opqazxc

1. =SUM((MMULT(N(ROW(1:30)>COLUMN(A:AD)),N(COUNTIF(OFFSET(A1,ROW(1:30),COLUMN(A:G)-1,30),A2:G31)=1))=3)*A2:G31)

复制代码

试了下
总会有意外
``

476363814

第一次参加这种竞赛，有不对的地方，望包含！为了这个题目，看了很多的竞赛题，学习了差不多一个月了，终于得到了这个公式，我用的是07版的，不知道能不能通过03版的验证。公式长度为113
=SUM((MMULT(N(COLUMN(A:AD)>=ROW(1:30)),N((COUNTIF(OFFSET(A32,,COLUMN(A:G)-1,ROW(2:31)-32),A2:G31)=0)))=7)*A2:G31)

476363814

经过思考可以就字符减少到 111
=SUM((MMULT(N(COLUMN(A:AD)>=ROW(1:30)),N(COUNTIF(OFFSET(A32,,COLUMN(A:G)-1,ROW(2:31)-32),A2:G31)=0))=7)*A2:G31)

jsxjd

勉强搞出来，长得有点不好意思，有待学习……
=SUM(A2:G31*(ROW(2:31)>MOD(SMALL(MOD(LOOKUP(ROW(1:10)*1000+COLUMN(A:G)/1%-901,SMALL(1000*A2:G31+ROW(A2:G31)+COLUMN(A2:G31)/1%,ROW(1:210))),1000),COLUMN(A:G)*10-7),100))*(ROW(2:31)<=MOD(SMALL(MOD(LOOKUP(ROW(1:10)*1000+COLUMN(A:G)/1%-901,SMALL(1000*A2:G31+ROW(A2:G31)+COLUMN(A2:G31)/1%,ROW(1:210))),1000),COLUMN(A:G)*10-6),100)))

fangjianp

1. =SUM((MMULT(-(COLUMN(A:AD)>30-ROW(1:30)),-(COUNTIF(OFFSET(A31,,COLUMN(A:G)-1,-ROW(1:30)),N(OFFSET(A32,-ROW(1:30),COLUMN(A:G)-1)))=1))=3)*A3:G32)

复制代码