注册 登录  
 加关注
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

Puriney's Notes

Puriney=purine+Y, my Wonderland

 
 
 

日志

 
 

[QWERT]累加数字  

2013-02-03 17:51:44|  分类: QWERT |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |

puriney@Truth[Mics] ./sum_of_number_string.pl 101101 [ 5:45下午]
start end sum
0 0 1
2 3 2
5 5 1


my $line = shift;
my @numbers = (split //,$line);

my $tag = 0;
my $sum = 0;

my $start;
my $end;
print "start\tend\tsum\n";
for (my $i = 0; $i <= @numbers-1;$i++ ) {
if ($numbers[$i] > 0 ){
$sum = $sum +$numbers[$i];
if ($tag ==0){
$tag =1;
$start = $i;
$end = $i;

}
elsif ($tag ==1){
$end ++;
}
if ( $i == @numbers -1){
print "$start\t$end\t$sum\n";
}
}
else {
if ($tag == 1){
print "$start\t$end\t$sum\n";
$sum =0;
$tag = 0;
}
elsif ($tag ==0){
($start, $end, $sum) = (0,0,0);
}
}
}


--
  评论这张
 
阅读(304)| 评论(0)
推荐 转载

历史上的今天

在LOFTER的更多文章

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2017