免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
最近访问板块 发新帖
查看: 36875 | 回复: 145

shell排序 [复制链接]

论坛徽章:
0
发表于 2010-09-28 15:17 |显示全部楼层
本帖最后由 marksman201 于 2010-09-28 16:33 编辑

$cat txt
a:0.13 b:0.23 c:0.05 d:0.45 e:0.07
p:0.01 q:0.20 r:0.13 s:0.33 t:0.23

要求每一行找到相加<0.5的K项(k尽量大),将这k项打印出来

评分

参与人数 1可用积分 +4 收起 理由
expert1 + 4 好题,但是下次要说清楚题意,有点难度,呵 ...

查看全部评分

论坛徽章:
0
发表于 2010-09-28 15:22 |显示全部楼层
没明白

论坛徽章:
1
2015年辞旧岁徽章
日期:2015-03-03 16:54:15
发表于 2010-09-28 15:35 |显示全部楼层
题出错了吧

论坛徽章:
0
发表于 2010-09-28 15:37 |显示全部楼层
回复 2# sunbw001


    可能我说的不是很明白:
每一行有好多项,每一项都形如name:number的形式,项之间用空格分隔

要求针对每一行找到k个项,这k个项相加要<0.5,并且K尽量大

明白了吗?

论坛徽章:
0
发表于 2010-09-28 15:38 |显示全部楼层
回复 1# marksman201


    前面说错了,K尽量的大,不是小

论坛徽章:
16
IT运维版块每日发帖之星
日期:2015-08-24 06:20:00综合交流区版块每日发帖之星
日期:2015-10-14 06:20:00IT运维版块每日发帖之星
日期:2015-10-25 06:20:00IT运维版块每日发帖之星
日期:2015-11-06 06:20:00IT运维版块每日发帖之星
日期:2015-12-10 06:20:00平安夜徽章
日期:2015-12-26 00:06:302016猴年福章徽章
日期:2016-02-18 15:30:34IT运维版块每日发帖之星
日期:2016-04-15 06:20:00IT运维版块每日发帖之星
日期:2016-05-21 06:20:00综合交流区版块每日发帖之星
日期:2016-08-16 06:20:002015七夕节徽章
日期:2015-08-21 11:06:17IT运维版块每日发帖之星
日期:2015-08-14 06:20:00
发表于 2010-09-28 15:58 |显示全部楼层
-F : (for(i=2;i<=NF;i+=2)sum=+$i;if(sum<0.5)print 前几项,break
前几项for一下,懒得写了。

论坛徽章:
0
发表于 2010-09-28 16:01 |显示全部楼层
use strict;
use warnings;
while ( my $line = <DATA> ) {
        chomp $line;
        my @nums  = $line =~ m#(?<=[^\s]+#g; #正则返回的值为匹配的内容
        my $sum   = 0;
        my $count = 0;
        foreach my $pos ( 0 .. $#nums ) {
                if ( $sum >= 0.5 ) {
                        $count = $pos - 2;
                        $sum -= $nums[ $pos - 1 ];
                        last;
                }
                $sum += $nums[$pos];
        }
        print "$sum\t$count\n";
}

__DATA__
a:0.13 b:0.23 c:0.05 d:0.45 e:0.07
p:0.01 q:0.20 r:0.13 s:0.33 t:0.23
结果
a:0.13 b:0.23 c:0.05 d:0.45 e:0.07
p:0.01 q:0.20 r:0.13 s:0.33 t:0.23

论坛徽章:
0
发表于 2010-09-28 16:02 |显示全部楼层
0.41        2
0.34        2

论坛徽章:
1
2015年辞旧岁徽章
日期:2015-03-03 16:54:15
发表于 2010-09-28 16:04 |显示全部楼层
楼主的意思是要先横向的排序,然后加法
猜的

论坛徽章:
0
发表于 2010-09-28 16:07 |显示全部楼层
print "$sum\t$count\t",join " ",@nums[0..$count],"\n";

0.41        2        0.13 0.23 0.05
0.34        2        0.01 0.20 0.13
这样的结果吧。
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

北京盛拓优讯信息技术有限公司. 版权所有 京ICP备16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122 niuxiaotong@pcpop.com 17352615567
未成年举报专区
中国互联网协会会员  联系我们:huangweiwei@itpub.net
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP