[第101期_1]三角形面积排列之二[已总结]

oyzhjr

oyzhjr 发表于 2014-2-14 17:44
公式一：＝MID(DEC2BIN(SMALL(IF(MMULT(LEN(SUBSTITUTE(DEC2BIN(ROW(1:63)),{2,1},)),{1;-1})=3,ROW(1:63), ...

没法编辑了贴子了。考虑到公式一额外使用了单元格格式，修正公式如下：
=IF(--MID(DEC2BIN(SMALL(IF(MMULT(LEN(SUBSTITUTE(DEC2BIN(ROW(1:63)),{2,1},)),{1;-1})=3,ROW(1:63),64),ROW()-1),7),{7,6,5,4,3,2},1),A1:F1,"")
139个字符，长度刚好。但是本人用的是EXCEL2013，无法找到2003进行验证，嵌套好像超了7层。

---

确实超嵌套了。          ——delete_007

huahua2005

想起03版没有IFERROR，原帖不能编辑，本着重在参与的精神再占一个楼层:)
评分2式
A2单元格

1. =IF(A$1=0,IF(SUMIF($A2:$F2,">0")=0,"",TEXT(SQRT(IF(SUMIF($A2:$F2,">0")/2<MAX($A2:$F2),0,SUMIF($A2:$F2,">0")/2*PRODUCT(IF($A2:$F2="",1,SUMIF($A2:$F2,">0")/2-(--$A2:$F2))))),"[>0]三角形面积为#0.0##;不能形成三角形")),IF(ROW()>21,"",IF(MOD(INT(SMALL({7,11,13,14,19,21,22,25,26,28,35,37,38,41,42,44,49,50,52,56},ROW()-1)*2/2^COLUMN()),2)=0,"",MOD(INT(SMALL({7,11,13,14,19,21,22,25,26,28,35,37,38,41,42,44,49,50,52,56},ROW()-1)*2/2^COLUMN()),2)*A$1)))

复制代码

三键、向右向下填充至G31~

fugb-2010

公式1：A2:F31=TEXT(MOD(INT(MOD(CODE(MID("薤蕹薜薅藁藿蘧蘖蘼弈匏尥尬扪抟拊拶挹捃捺蕤蕤蕤蕤蕤蕤蕤蕤蕤蕤",ROW(1:30),1)),100)/{1,2,4,8,16,32}),2)*A1:F1,"[>];")
公式2：G2=TEXT(MAX(PRODUCT(MMULT(LARGE((FIND(COLUMN(A:F),MID("123124134234125135235145245345126136236146246346156256356456",ROW(1:1)*3-2,3)&1/17)<4)*A$1:F$1,{1,2,3})*(2*({1,2,3}<>{1;2;3;4})-1),{1;1;1})),0)^0.5/4-(ROW(1:1)>20)/1%,"三角形面积为0.000;;不能形成三角形")
均为数组公式

fugb-2010

公式三：A2=TEXT(TEXT(PRODUCT(MMULT(LARGE((FIND(COLUMN($A:$F),MID("123124134234125135235145245345126136236146246346156256356456",ROW(1:1)*3-2,3)&1/17)<4)*$A$1:$F$1,{1,2,3})*(2*({1,2,3}<>{1;2;3;4})-1),{1;1;1})),".000;!0")^0.5/4*(A$1=0),"三角形面积为0.000;;"&IF((A$1=0)*(ROW(1:1)<21),"不能形成三角形",TEXT((FIND(COLUMN(A:A),MID("123124134234125135235145245345126136236146246346156256356456",ROW(1:1)*3-2,3)&1/17)<4)*A$1,"0;;"))&"")

羽希

公式一
多单元简写
=IF(ROW()<22*MID(LARGE((SUBSTITUTE(DEC2BIN(ROW(64:127)),1,)="000")*DEC2BIN(ROW(64:127)),ROW()-1)&10^8,COLUMN()+1,1),1:1,"")

完整的
=IF((ROW()-2)<COMBIN(6,3)*MID(LARGE((SUBSTITUTE(DEC2BIN(ROW(64:127)),1,)="000")*DEC2BIN(ROW(64:127)),ROW()-1)&10^8,COLUMN()+1,1),1:1,"")

公式二要加自定义了
=TEXT(PRODUCT(SUM(A$1:F$1*MID(LARGE((SUBSTITUTE(DEC2BIN(ROW($64:$127)),1,)="000")*DEC2BIN(ROW($64:$127)),ROW(A1))&10^8,COLUMN(B:G),1))/2-LARGE(A$1:F$1*MID(LARGE((SUBSTITUTE(DEC2BIN(ROW($64:$127)),1,)="000")*DEC2BIN(ROW($64:$127)),ROW(A1))&10^8,COLUMN(B:G),1),{1,2,3,4})),"0.000;!0")^0.5

qy1219no2

qy1219no2 发表于 2014-1-8 21:46
评分1.

A2:F31多单元格数组公式，135字符

无法编辑原帖了？？

delete_007

时间到，答题截止，先开贴，请大家不要再修改自己的帖子，以免影响评分，谢谢。

delete_007

由于最近我工作较忙，评分总结可能会推迟一段时间，请大家谅解。