[第51期][已结题]数字游戏——数字格式变换

wshcw

数字游戏——格式变换,要求看附件
答题要求:
公式完全正确,并且公式长度满足以下要求的给予加技术分
公式长度<110字(包括"="算在内)的加技术分1分
公式长度<100字(包括"="算在内)的加技术分2分
如有创新解法，视具体情况给予评分。

补充说明:
1、第一个"*"号前面的数字最少是一位,但最多只有3位。
2、"*"后面的3组数字最多可能有4位,但最少有1位。
验证以下这些字符串是否能通过?
1*2508*2358*1
1*1*1*2
111*2589*1234*2598
验证通不过.竞赛题不得分
3、公式不能使用辅助列，也不能定义名称(自定义单元格格式也不算)。

[ 本帖最后由 wshcw 于 2009-9-4 22:44 编辑 ]

风冷

1. =TEXT(SUM(MID(SUBSTITUTE(A2,"*",REPT(" ",7)),{1,9,16,25},7)*10^{12,8,4,0}),"0000\*0000\*0000\*0000")

复制代码

[ 本帖最后由 风冷 于 2009-8-28 11:54 编辑 ]

kkitt

=TEXT(SUM(MID(SUBSTITUTE(A2,"*",REPT(" ",99)),99*{0;1;2;3}+1,99)*10^{12;8;4;0}),REPT("0000!*",3)&"0000")

[ 本帖最后由 kkitt 于 2009-8-28 12:17 编辑 ]

ff8feng

=TEXT(SUM(TRIM(MID(SUBSTITUTE(A2,"*",REPT(" ",9)),{1;10;19;28},9))*10^{12;8;4;0}),"0000"&REPT("\*0000",3))
我来凑个数

biaotiger1

=LEFT(TEXT(SUM(MID(SUBSTITUTE(A3,"*",REPT(" ",20)),1+20*{0;1;2;3},20)*10^({12;8;4;0})),REPT("0000!*",4)),19)



另有个问题很奇怪——

测试期间，如果A1=1111*2222*3333*4444
单步执行过程中，即使mid可以取到各部分的数字，但是sum之后总是缺少最后一位哦

或者我这种做法不准确

------------------------------------------------------------
超过15位了哦 呵呵

[ 本帖最后由 biaotiger1 于 2009-8-28 13:52 编辑 ]

wjzwang

不得分的答案:
=TEXT(SUM(MID(SUBSTITUTE(A2,"*",REPT(" ",50)),1+(ROW($1:$4)-1)*50,50)*10^((4-ROW($1:$4))*4)),REPT("0000!*",3)&"0000")
取巧一下的如下:
=TEXT(SUM(MID(SUBSTITUTE(A66,"*",REPT(" ",20)),{1;21;41;61},20)*10^{12;8;4;0}),REPT("0000!*",3)&"0000")

[ 本帖最后由 wjzwang 于 2009-8-29 10:13 编辑 ]

xiongkehua2008

樓主功力之深厚,小弟深感敬佩!現附上我的答案,或許有取巧之處...呵呵!

wangrw989

向KKITT朋友学习下

冻豆腐

101字符。普通公式
=TEXT(SUM(MID(SUBSTITUTE(A2,"*",REPT(" ",20)),{1;9;40;60},20)*10^{12;8;4;0}),REPT("0000!*",3)&"0000")

shuts32

=TEXT(SUM(MID(SUBSTITUTE(A2,"*",REPT(" ",32)),{1,9,49,89},32)*10^{12,8,4,0}),REPT("0000!*",3)&"0000")
len=100
我是新来的，不知道能不能参加正式竞赛，蛮发了

[ 本帖最后由 shuts32 于 2009-8-28 20:39 编辑 ]