Problem:
Score : 200 points

Problem Statement

Find the sum of the integers between 1 and N (inclusive), whose sum of digits written in base 10 is between A and B (inclusive).

Constraints

1 \leq N \leq 10^4

1 \leq A \leq B \leq 36

All input values are integers.

Input

Input is given from Standard Input in the following format:

N A B

Output

Print the sum of the integers between 1 and N (inclusive), whose sum of digits written in base 10 is between A and B (inclusive).

Sample Input 1

20 2 5

Sample Output 1

84

Among the integers not greater than 20, the ones whose sums of digits are between 2 and 5, are: 2,3,4,5,11,12,13,14 and 20. We should print the sum of these, 84.

Sample Input 2

10 1 2

Sample Output 2

13

Sample Input 3

100 4 16

Sample Output 3

4554

Solution in Perl (v5.18.2) (judge verdict: Accepted)

#!/usr/bin/perl
#abc083_b.pl
#Wed Jan 10 20:26:19 2018
#

use warnings;
use strict;

my $temp = <STDIN>;
chomp $temp;

my @temps = split(" ",$temp);

my $n = $temps[0];
my $a = $temps[1];
my $b = $temps[2];

my $num = 1;

my $answer = 0;

while ($num <= $n){
	my @digit = split("",$num);
	my $total = 0;
	foreach (@digit){
		$total = $total + $_;
	}
	if ($total >= $a && $total <=$b){
		$answer = $answer + $num;
	}
	$num++;
}

print $answer,"\n";