document.write( "Question 1196433: How many numbers between 10 and 1000 have a digit sum of 8?
\n" ); document.write( " \n" ); document.write( "

Algebra.Com's Answer #829253 by math_helper(2461) $\"\"$ $\"About$

You can put this solution on YOUR website!

\r
\n" );
document.write( "\n" );
document.write( "44,  found using this one-line perl script\r
\n" );
document.write( "\n" );
document.write( "perl -e '$c=0; for($i=10;$i<1001;$i++) { $s = \"$i\"; @c = split(//,\"$s\"); $sum=0; foreach( @c ) { $sum += $_;};  if ($sum == 8) { print \"$i   $sum\n\"; } else { print \"$i\n\"; }}' | grep '   8' | wc -l\r
\n" );
document.write( "\n" );
document.write( "      44\r
\n" );
document.write( "
\n" );
document.write( "
\n" );
document.write( "\n" );
document.write( "To see the raw output of just the numbers that have digits adding to 8:\r
\n" );
document.write( "\n" );
document.write( "perl -e '$c=0; for($i=10;$i<1001;$i++) { $s = \"$i\"; @c = split(//,\"$s\"); $sum=0; foreach( @c ) { $sum += $_;};  if ($sum == 8) { print \"$i   $sum\n\"; }}'\r
\n" );
document.write( "
\n" );
document.write( "\n" );
document.write( "And to see ALL the numbers considered:\r
\n" );
document.write( "\n" );
document.write( "perl -e '$c=0; for($i=10;$i<1001;$i++) { $s = \"$i\"; @c = split(//,\"$s\"); $sum=0; foreach( @c ) { $sum += $_;};  if ($sum == 8) { print \"$i   $sum\n\"; } else { print \"$i\n\"; }}'\r
\n" );
document.write( "\n" );
document.write( " \n" );
document.write( "

\n" );