- Added solutions by Eric Cheung.

- Added solutions by Ulrich Rieke.
- Added solutions by David Ferrone.
- Added solutions by E. Choroba.
- Added solutions by Mark Anderson.
- Added solutions by Jaldhar H. Vyas.
- Added solutions by Ali Moradi.
- Added solutions by Feng Chang.
- Added solutions by Vinod Kumar K.
- Added solutions by Peter Campbell Smith.
- Added solutions by Ali Moradi.
- Added solutions by Feng Chang.
- Added solutions by Conor Hoekstra.
- Added solutions by Bob Lied.
- Added solutions by Athanasius.
- Added solutions by W. Luis Mochan.
- Added solutions by Andrew Shitov.
- Added solutions by PokGoPun.
- Added solutions by Roger Bell_West.

38 files changed, 3343 insertions, 2779 deletions

diff --git a/challenge-320/conor-hoekstra/ch-1.bqn b/challenge-320/conor-hoekstra/bqn/ch-1.bqn
index 332ee5a755..332ee5a755 100644
--- a/challenge-320/conor-hoekstra/ch-1.bqn
+++ b/challenge-320/conor-hoekstra/bqn/ch-1.bqn
diff --git a/challenge-320/conor-hoekstra/ch-2.bqn b/challenge-320/conor-hoekstra/bqn/ch-2.bqn
index 20d234a4ba..20d234a4ba 100644
--- a/challenge-320/conor-hoekstra/ch-2.bqn
+++ b/challenge-320/conor-hoekstra/bqn/ch-2.bqn
diff --git a/challenge-320/eric-cheung/python/ch-1.py b/challenge-320/eric-cheung/python/ch-1.py
new file mode 100755
index 0000000000..57f640454f
--- /dev/null
+++ b/challenge-320/eric-cheung/python/ch-1.py
@@ -0,0 +1,9 @@
+

+## arrInts = [-3, -2, -1, 1, 2, 3]  ## Example 1

+## arrInts = [-2, -1, 0, 0, 1]  ## Example 2

+arrInts = [1, 2, 3, 4]  ## Example 3

+

+nPosCount = len([nLoop for nLoop in arrInts if nLoop > 0])

+nNegCount = len([nLoop for nLoop in arrInts if nLoop < 0])

+

+print (max(nPosCount, nNegCount))

diff --git a/challenge-320/eric-cheung/python/ch-2.py b/challenge-320/eric-cheung/python/ch-2.py
new file mode 100755
index 0000000000..5e2c3d812c
--- /dev/null
+++ b/challenge-320/eric-cheung/python/ch-2.py
@@ -0,0 +1,12 @@
+

+## arrInts = [1, 23, 4, 5]  ## Example 1

+## arrInts = [1, 2, 3, 4, 5]  ## Example 2

+arrInts = [1, 2, 34]  ## Example 3

+

+nElemSum = sum(arrInts)

+nDigitSum = sum([sum([int(charLoop) for charLoop in list(str(nLoop))]) for nLoop in arrInts])

+

+## print (nElemSum)

+## print (nDigitSum)

+

+print (abs(nElemSum - nDigitSum))

diff --git a/challenge-320/ulrich-rieke/cpp/ch-1.cpp b/challenge-320/ulrich-rieke/cpp/ch-1.cpp
new file mode 100755
index 0000000000..158bba2cb8
--- /dev/null
+++ b/challenge-320/ulrich-rieke/cpp/ch-1.cpp
@@ -0,0 +1,36 @@
+#include <vector>

+#include <iostream>

+#include <string>

+#include <sstream>

+#include <cstdlib>

+#include <algorithm>

+

+std::vector<std::string> split( const std::string & text , char delimiter ) {

+   std::vector<std::string> tokens ;

+   std::istringstream istr { text } ;

+   std::string word ;

+   while ( std::getline( istr , word , delimiter ) ) 

+      tokens.push_back( word ) ;

+   return tokens ;

+}

+

+int main( ) {

+   std::cout << "Enter some integers separated by blanks!\n" ;

+   std::string line ;

+   std::getline( std::cin , line ) ;

+   auto tokens { split( line , ' ' ) } ;

+   std::vector<int> numbers ;

+   for ( auto s : tokens ) 

+      numbers.push_back( std::stoi( s ) ) ;

+   int positives = std::count_if( numbers.begin( ) , numbers.end( ) , [](int i) {

+	 return i > 0 ; } ) ;

+   int negatives = std::count_if( numbers.begin( ) , numbers.end( ) , [](int i) {

+	 return i < 0 ; } ) ;

+   if ( positives != 0 || negatives != 0 ) {

+      std::cout << std::max( positives , negatives ) << '\n' ;

+   }

+   else {

+      std::cout << 0 << '\n' ;

+   }

+   return 0 ;

+}

diff --git a/challenge-320/ulrich-rieke/cpp/ch-2.cpp b/challenge-320/ulrich-rieke/cpp/ch-2.cpp
new file mode 100755
index 0000000000..9950e4e891
--- /dev/null
+++ b/challenge-320/ulrich-rieke/cpp/ch-2.cpp
@@ -0,0 +1,44 @@
+#include <iostream>

+#include <sstream>

+#include <numeric>

+#include <string>

+#include <vector>

+#include <cstdlib>

+

+std::vector<std::string> split( const std::string & text , char delimiter ) {

+   std::vector<std::string> tokens ;

+   std::istringstream istr { text } ;

+   std::string word ;

+   while ( std::getline( istr , word , delimiter ) ) 

+      tokens.push_back( word ) ;

+   return tokens ;

+}

+

+int digitsum( int number ) {

+   int sum = 0 ;

+   while ( number != 0 ) {

+      sum += number % 10 ;

+      number /= 10 ;

+   }

+   return sum ;

+}

+

+int main( ) {

+   std::cout << "Enter some positive integers separated by blanks!\n" ;

+   std::string line ;

+   std::getline( std::cin , line ) ;

+   auto tokens { split( line , ' ' ) } ;

+   std::vector<int> numbers ;

+   for ( auto s : tokens ) 

+      numbers.push_back( std::stoi( s ) ) ;

+   int numbersum = std::accumulate( numbers.begin( ) , numbers.end( ) , 0 ) ;

+   std::vector<int> digitsums ;

+   for ( int n : numbers ) {

+      digitsums.push_back( digitsum( n ) ) ;

+   }

+   int all_digit_sum = std::accumulate( digitsums.begin( ) , digitsums.end( ) , 

+	 0 ) ;

+   std::cout << std::abs( all_digit_sum - numbersum ) << '\n' ;

+   return 0 ;

+}

+

diff --git a/challenge-320/ulrich-rieke/haskell/ch-1.hs b/challenge-320/ulrich-rieke/haskell/ch-1.hs
new file mode 100755
index 0000000000..eb3137b388
--- /dev/null
+++ b/challenge-320/ulrich-rieke/haskell/ch-1.hs
@@ -0,0 +1,16 @@
+module Challenge320

+   where

+

+solution :: [Int] -> Int

+solution list = if all (== 0) list then 0 else max positives negatives

+   where

+      positives :: Int

+      positives = length $ filter ( > 0 ) list

+      negatives :: Int

+      negatives = length $ filter ( < 0 ) list

+

+main :: IO ( )

+main = do 

+   putStrLn "Enter some integers separated by blanks!"

+   numberline <- getLine

+   print $ solution $ map read $ words numberline

diff --git a/challenge-320/ulrich-rieke/haskell/ch-2.hs b/challenge-320/ulrich-rieke/haskell/ch-2.hs
new file mode 100755
index 0000000000..becfa51647
--- /dev/null
+++ b/challenge-320/ulrich-rieke/haskell/ch-2.hs
@@ -0,0 +1,18 @@
+module Challenge320_2

+   where

+import Data.Char ( digitToInt ) 

+

+solution :: [Int] -> Int

+solution list = abs ( numbersum - allDigitSum )

+   where

+    numbersum :: Int

+    numbersum = sum list

+    allDigitSum :: Int

+    allDigitSum = sum $ map ( sum . map digitToInt . show ) list

+

+main :: IO ( ) 

+main = do

+   putStrLn "Enter some positive integers separated by blanks!"

+   numberline <- getLine

+   print $ solution $ map read $ words numberline

+

diff --git a/challenge-320/ulrich-rieke/perl/ch-1.pl b/challenge-320/ulrich-rieke/perl/ch-1.pl
new file mode 100755
index 0000000000..00dd5c6869
--- /dev/null
+++ b/challenge-320/ulrich-rieke/perl/ch-1.pl
@@ -0,0 +1,18 @@
+#!/usr/bin/perl ;

+use strict ;

+use warnings ;

+use feature 'say' ;

+use List::Util qw ( max ) ;

+

+say "Enter some integers separated by blanks!" ;

+my $line = <STDIN> ;

+chomp $line ;

+my @numbers = split( /\s/ , $line ) ;

+my $positives = scalar( grep { $_ > 0 } @numbers ) ;

+my $negatives = scalar( grep { $_ < 0 } @numbers ) ;

+if ( $positives != 0 || $negatives != 0 ) {

+   say max( $positives , $negatives ) ;

+}

+else {

+   say 0 ;

+}

diff --git a/challenge-320/ulrich-rieke/perl/ch-2.pl b/challenge-320/ulrich-rieke/perl/ch-2.pl
new file mode 100755
index 0000000000..1caa708a93
--- /dev/null
+++ b/challenge-320/ulrich-rieke/perl/ch-2.pl
@@ -0,0 +1,14 @@
+#!/usr/bin/perl ;

+use strict ;

+use warnings ;

+use feature 'say' ;

+use List::Util qw ( sum ) ;

+

+say "Enter some positive integers separated by blanks!" ;

+my $line = <STDIN> ;

+chomp $line ;

+my @numbers = split( /\s/ , $line ) ;

+my $numbersum = sum( @numbers ) ;

+my @digits = map { [split(// , $_)] } @numbers ;

+my $all_digit_sum = sum( map { sum( @$_ ) } @digits ) ;

+say abs( $numbersum - $all_digit_sum ) ;

diff --git a/challenge-320/ulrich-rieke/raku/ch-1.raku b/challenge-320/ulrich-rieke/raku/ch-1.raku
new file mode 100755
index 0000000000..b0eca84c46
--- /dev/null
+++ b/challenge-320/ulrich-rieke/raku/ch-1.raku
@@ -0,0 +1,13 @@
+use v6 ;

+

+say "Enter some integers separated by blanks!" ;

+my $line = $*IN.get ;

+my @numbers = $line.words.map( {.Int} ) ;

+my $positives = @numbers.grep( {$_ > 0} ).elems ;

+my $negatives = @numbers.grep( {$_ < 0} ).elems ;

+if ( $positives != 0 || $negatives != 0 ) {

+   say ($positives , $negatives).max ;

+}

+else {

+   say 0 ;

+}

diff --git a/challenge-320/ulrich-rieke/raku/ch-2.raku b/challenge-320/ulrich-rieke/raku/ch-2.raku
new file mode 100755
index 0000000000..a55f945b74
--- /dev/null
+++ b/challenge-320/ulrich-rieke/raku/ch-2.raku
@@ -0,0 +1,17 @@
+use v6 ;

+

+sub digitsum( $number is copy ) {

+   my $sum = 0 ;

+   while ( $number != 0 ) {

+      $sum += $number % 10 ;

+      $number div= 10 ;

+   }

+   return $sum ;

+}

+

+say "Enter some positive integers separated by blanks!" ;

+my $line = $*IN.get ;

+my @numbers = $line.words.map( {.Int} ) ;

+my $numbersum = [+] @numbers ;

+my $all_digit_sum = [+] @numbers.map( {digitsum( $_ )} ) ;

+say ($numbersum - $all_digit_sum).abs ;

diff --git a/challenge-320/ulrich-rieke/rust/ch-1.rs b/challenge-320/ulrich-rieke/rust/ch-1.rs
new file mode 100755
index 0000000000..ae42871e6b
--- /dev/null
+++ b/challenge-320/ulrich-rieke/rust/ch-1.rs
@@ -0,0 +1,17 @@
+use std::{io, cmp} ;
+
+fn main() {
+    println!("Enter some integers separated by blanks!");
+    let mut inline : String = String::new( ) ;
+    io::stdin( ).read_line( &mut inline ).unwrap( ) ;
+    let numbers : Vec<i32> = inline.trim( ).split_whitespace( ).map( |s| 
+	  s.parse::<i32>( ).unwrap( ) ).collect( ) ;
+    let positives : usize = numbers.iter( ).filter( |&d| *d > 0 ).count( ) ;
+    let negatives : usize = numbers.iter( ).filter( |&d| *d < 0 ).count( ) ;
+    if positives != 0 || negatives != 0 {
+       println!("{}" , cmp::max( positives , negatives) ) ;
+    }
+    else {
+       println!("0") ;
+    }
+}
diff --git a/challenge-320/ulrich-rieke/rust/ch-2.rs b/challenge-320/ulrich-rieke/rust/ch-2.rs
new file mode 100755
index 0000000000..4593e933a6
--- /dev/null
+++ b/challenge-320/ulrich-rieke/rust/ch-2.rs
@@ -0,0 +1,22 @@
+use std::io ;
+
+fn digit_sum( mut number : u32 ) -> u32 {
+   let mut sum : u32 = 0 ;
+   while number != 0 {
+      sum += number % 10 ;
+      number /= 10 ;
+   }
+   sum 
+}
+
+fn main() {
+    println!("Enter some positive integers separated by blanks!");
+    let mut inline : String = String::new( ) ;
+    io::stdin( ).read_line( &mut inline ).unwrap( ) ;
+    let mut numbers : Vec<u32> = inline.trim( ).split_whitespace( ).map( |s|
+	  s.parse::<u32>( ).unwrap( ) ).collect( ) ;
+    let numbersum : u32 = numbers.iter( ).sum( ) ;
+    let all_digit_sum : u32 = numbers.iter_mut( ).map( |s| digit_sum( *s ) )
+       .sum( ) ;
+    println!("{}" , (numbersum as i32).abs_diff( all_digit_sum as i32 ) ) ;
+}
diff --git a/stats/pwc-challenge-319.json b/stats/pwc-challenge-319.json
new file mode 100644
index 0000000000..b76d1b6d6d
--- /dev/null
+++ b/stats/pwc-challenge-319.json
@@ -0,0 +1,513 @@
+{
+   "chart" : {
+      "type" : "column"
+   },
+   "series" : [
+      {
+         "name" : "The Weekly Challenge - 319",
+         "data" : [
+            {
+               "drilldown" : "Adam Russell",
+               "y" : 4,
+               "name" : "Adam Russell"
+            },
+            {
+               "drilldown" : "Ali Moradi",
+               "y" : 3,
+               "name" : "Ali Moradi"
+            },
+            {
+               "y" : 2,
+               "drilldown" : "Andreas Mahnke",
+               "name" : "Andreas Mahnke"
+            },
+            {
+               "name" : "Arne Sommer",
+               "drilldown" : "Arne Sommer",
+               "y" : 3
+            },
+            {
+               "name" : "Athanasius",
+               "drilldown" : "Athanasius",
+               "y" : 4
+            },
+            {
+               "name" : "BarrOff",
+               "y" : 2,
+               "drilldown" : "BarrOff"
+            },
+            {
+               "name" : "Bob Lied",
+               "drilldown" : "Bob Lied",
+               "y" : 2
+            },
+            {
+               "drilldown" : "David Ferrone",
+               "y" : 2,
+               "name" : "David Ferrone"
+            },
+            {
+               "drilldown" : "E. Choroba",
+               "y" : 2,
+               "name" : "E. Choroba"
+            },
+            {
+               "name" : "Feng Chang",
+               "drilldown" : "Feng Chang",
+               "y" : 2
+            },
+            {
+               "name" : "Jan Krnavek",
+               "y" : 2,
+               "drilldown" : "Jan Krnavek"
+            },
+            {
+               "name" : "Jorg Sommrey",
+               "y" : 3,
+               "drilldown" : "Jorg Sommrey"
+            },
+            {
+               "name" : "Mark Anderson",
+               "y" : 2,
+               "drilldown" : "Mark Anderson"
+            },
+            {
+               "drilldown" : "Matthias Muth",
+               "y" : 3,
+               "name" : "Matthias Muth"
+            },
+            {
+               "y" : 2,
+               "drilldown" : "Niels van Dijke",
+               "name" : "Niels van Dijke"
+            },
+            {
+               "drilldown" : "Packy Anderson",
+               "y" : 5,
+               "name" : "Packy Anderson"
+            },
+            {
+               "y" : 3,
+               "drilldown" : "Peter Campbell Smith",
+               "name" : "Peter Campbell Smith"
+            },
+            {
+               "name" : "Peter Meszaros",
+               "drilldown" : "Peter Meszaros",
+               "y" : 2
+            },
+            {
+               "y" : 3,
+               "drilldown" : "Robbie Hatley",
+               "name" : "Robbie Hatley"
+            },
+            {
+               "y" : 2,
+               "drilldown" : "Robert Ransbottom",
+               "name" : "Robert Ransbottom"
+            },
+            {
+               "y" : 5,
+               "drilldown" : "Roger Bell_West",
+               "name" : "Roger Bell_West"
+            },
+            {
+               "name" : "Simon Green",
+               "drilldown" : "Simon Green",
+               "y" : 1
+            },
+            {
+               "name" : "Thomas Kohler",
+               "drilldown" : "Thomas Kohler",
+               "y" : 4
+            },
+            {
+               "name" : "Ulrich Rieke",
+               "y" : 4,
+               "drilldown" : "Ulrich Rieke"
+            },
+            {
+               "y" : 2,
+               "drilldown" : "Vinod Kumar K",
+               "name" : "Vinod Kumar K"
+            },
+            {
+               "name" : "W. Luis Mochan",
+               "y" : 3,
+               "drilldown" : "W. Luis Mochan"
+            },
+            {
+               "drilldown" : "Wanderdoc",
+               "y" : 2,
+               "name" : "Wanderdoc"
+            }
+         ],
+         "colorByPoint" : 1
+      }
+   ],
+   "tooltip" : {
+      "pointFormat" : "<span style='color:{point.color}'>{point.name}</span>: <b>{point.y:f}</b><br/>",
+      "headerFormat" : "<span style='font-size:11px'>{series.name}</span><br/>",
+      "followPointer" : 1
+   },
+   "title" : {
+      "text" : "The Weekly Challenge - 319"
+   },
+   "yAxis" : {
+      "title" : {
+         "text" : "Total Solutions"
+      }
+   },
+   "subtitle" : {
+      "text" : "[Champions: 27] Last updated at 2025-05-06 14:44:51 GMT"
+   },
+   "plotOptions" : {
+      "series" : {
+         "dataLabels" : {
+            "format" : "{point.y}",
+            "enabled" : 1
+         },
+         "borderWidth" : 0
+      }
+   },
+   "xAxis" : {
+      "type" : "category"
+   },
+   "legend" : {
+      "enabled" : 0
+   },
+   "drilldown" : {
+      "series" : [
+         {
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ],
+               [
+                  "Blog",
+                  2
+               ]
+            ],
+            "id" : "Adam Russell",
+            "name" : "Adam Russell"
+         },
+         {
+            "name" : "Ali Moradi",
+            "id" : "Ali Moradi",
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ],
+               [
+                  "Blog",
+                  1
+               ]
+            ]
+         },
+         {
+            "id" : "Andreas Mahnke",
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ]
+            ],
+            "name" : "Andreas Mahnke"
+         },
+         {
+            "name" : "Arne Sommer",
+            "id" : "Arne Sommer",
+            "data" : [
+               [
+                  "Raku",
+                  2
+               ],
+               [
+                  "Blog",
+                  1
+               ]
+            ]
+         },
+         {
+            "id" : "Athanasius",
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ],
+               [
+                  "Raku",
+                  2
+               ]
+            ],
+            "name" : "Athanasius"
+         },
+         {
+            "data" : [
+               [
+                  "Raku",
+                  2
+               ]
+            ],
+            "id" : "BarrOff",
+            "name" : "BarrOff"
+         },
+         {
+            "data" : [
+               [
+                  "Blog",
+                  2
+               ]
+            ],
+            "id" : "Bob Lied",
+            "name" : "Bob Lied"
+         },
+         {
+            "name" : "David Ferrone",
+            "id" : "David Ferrone",
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ]
+            ]
+         },
+         {
+            "name" : "E. Choroba",
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ]
+            ],
+            "id" : "E. Choroba"
+         },
+         {
+            "data" : [
+               [
+                  "Raku",
+                  2
+               ]
+            ],
+            "id" : "Feng Chang",
+            "name" : "Feng Chang"
+         },
+         {
+            "name" : "Jan Krnavek",
+            "id" : "Jan Krnavek",
+            "data" : [
+               [
+                  "Raku",
+                  2
+               ]
+            ]
+         },
+         {
+            "name" : "Jorg Sommrey",
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ],
+               [
+                  "Blog",
+                  1
+               ]
+            ],
+            "id" : "Jorg Sommrey"
+         },
+         {
+            "name" : "Mark Anderson",
+            "id" : "Mark Anderson",
+            "data" : [
+               [
+                  "Raku",
+                  2
+               ]
+            ]
+         },
+         {
+            "name" : "Matthias Muth",
+            "id" : "Matthias Muth",
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ],
+               [
+                  "Blog",
+                  1
+               ]
+            ]
+         },
+         {
+            "id" : "Niels van Dijke",
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ]
+            ],
+            "name" : "Niels van Dijke"
+         },
+         {
+            "id" : "Packy Anderson",
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ],
+               [
+                  "Raku",
+                  2
+               ],
+               [
+                  "Blog",
+                  1
+               ]
+            ],
+            "name" : "Packy Anderson"
+         },
+         {
+            "name" : "Peter Campbell Smith",
+            "id" : "Peter Campbell Smith",
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ],
+               [
+                  "Blog",
+                  1
+               ]
+            ]
+         },
+         {
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ]
+            ],
+            "id" : "Peter Meszaros",
+            "name" : "Peter Meszaros"
+         },
+         {
+            "name" : "Robbie Hatley",
+            "id" : "Robbie Hatley",
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ],
+               [
+                  "Blog",
+                  1
+               ]
+            ]
+         },
+         {
+            "data" : [
+               [
+                  "Raku",
+                  2
+               ]
+            ],
+            "id" : "Robert Ransbottom",
+            "name" : "Robert Ransbottom"
+         },
+         {
+            "id" : "Roger Bell_West",
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ],
+               [
+                  "Raku",
+                  2
+               ],
+               [
+                  "Blog",
+                  1
+               ]
+            ],
+            "name" : "Roger Bell_West"
+         },
+         {
+            "id" : "Simon Green",
+            "data" : [
+               [
+                  "Blog",
+                  1
+               ]
+            ],
+            "name" : "Simon Green"
+         },
+         {
+            "id" : "Thomas Kohler",
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ],
+               [
+                  "Blog",
+                  2
+               ]
+            ],
+            "name" : "Thomas Kohler"
+         },
+         {
+            "name" : "Ulrich Rieke",
+            "id" : "Ulrich Rieke",
+            "data" : [
+               [
+                  "Perl",
+                  2
+               ],
+               [
+                  "Raku",
+                  2
+               ]
+