      PROGRAM someSums
      IMPLICIT NONE
      INTEGER :: N,A,B, ans
      INTEGER :: num(4), digit, i, piyo, aa,bb,cc,dd , s
      
      READ*,N,A,B
      ans = 0
      
      num(:) = 0
      digit = 1000
      piyo = N
      DO i = 1,4
        DO while(.TRUE.)
          IF(piyo>=digit)THEN
            piyo = piyo - digit
            num(i) = num(i) + 1
          ELSE
            digit = digit / 10
            EXIT
          END IF
        END DO
      END DO
      print*,num
      
      DO aa = 0,9
        DO bb = 0,9
          DO cc = 0,9
            DO dd = 0,9
              s = aa + bb + cc + dd
              IF(A<=s.AND.B>=s)THEN
                ans = ans + aa*1000+bb*100+cc*10+dd
              END IF
              IF(dd==num(4).AND.cc==num(3).AND. &
              bb==num(2).AND.aa==num(1))THEN
                print'(I0)',ans
                STOP
              END IF
            END DO
          END DO
        END DO
      END DO
      
      
      
      
      
      END PROGRAM