advanced code snippet search

Posted By

apoz on 06/23/11


Tagged

perl contest tuenti


Versions (?)

Space separated values sum

 / Published in: Perl
 

Program that sums all the values (including big positive/negative integers)

Expand | Embed | Plain Text 
  1. use strict;
  2. use warnings;
  3. use Math::BigInt;
  4.  
  5. while(<>)
  6. {
  7. 	chomp; 
  8. 	s/^ +//g;
  9. 	my @values = split /\s+/;
  10. 	my $elemento;
  11. 	my $sum = Math::BigInt->new('0');
  12. 	foreach $elemento (@values)
  13. 	{
  14. 		$sum->badd(Math::BigInt->new($elemento));
  15.     }
  16. 	print "$sum\n";
  17. 	$sum=0;
  18. }

Report this snippet  

Comments

RSS Icon Subscribe to comments
Posted By: apoz on June 23, 2011

This snippet solves Tuenti programming contest #1 test https://contest.tuenti.net/?id=1&m=Questions&func=index

Posted By: apoz on June 23, 2011

This snippet solves Tuenti programming contest #1 test https://contest.tuenti.net/?id=1&m=Questions&func=index

Posted By: apoz on June 23, 2011

This snippet solves Tuenti programming contest #1 test https://contest.tuenti.net/?id=1&m=Questions&func=index

You need to login to post a comment.