I have a list like this:-
Here numbers with the leading digit 1 are 10, 16, and 1. How can I compute this result in Mathematica?