Cody

# Problem 47. Extract leading non-zero digit

Solution 336652

Submitted on 21 Oct 2013 by Eli Gershon
This solution is locked. To view this solution, you need to provide a solution of the same size or smaller.

### Test Suite

Test Status Code Input and Output
1   Pass
%% x = [100 23 -34 0.005 -0.466664 -0.555 1 134534]; y_correct = [1 2 3 5 4 5 1 1]; assert(isequal(leadingDigit(x),y_correct))

a = Columns 1 through 3 1.000000000000000e+02 2.300000000000000e+01 3.400000000000000e+01 Columns 4 through 6 5.000000000000000e-03 4.666640000000000e-01 5.550000000000000e-01 Columns 7 through 8 1.000000000000000e+00 1.345340000000000e+05 z = 2 1 1 -3 -1 -1 0 5 d = Columns 1 through 3 1.000000000000000e-02 1.000000000000000e-01 1.000000000000000e-01 Columns 4 through 6 1.000000000000000e+03 1.000000000000000e+01 1.000000000000000e+01 Columns 7 through 8 1.000000000000000e+00 9.999999999999999e-06 y = 1 2 3 5 4 5 1 1

2   Pass
%% x = [57 -0.2 8913 -63 0.838127]; y_correct = [5 2 8 6 8]; assert(isequal(leadingDigit(x),y_correct))

a = Columns 1 through 3 5.700000000000000e+01 2.000000000000000e-01 8.913000000000000e+03 Columns 4 through 5 6.300000000000000e+01 8.381270000000000e-01 z = 1 -1 3 1 -1 d = Columns 1 through 3 1.000000000000000e-01 1.000000000000000e+01 1.000000000000000e-03 Columns 4 through 5 1.000000000000000e-01 1.000000000000000e+01 y = 5 2 8 6 8

3   Pass
%% x = [-0.4336 0.3426 3.5784 2.7694 -1.3499]; y_correct = [4 3 3 2 1]; assert(isequal(leadingDigit(x),y_correct))

a = Columns 1 through 3 4.336000000000000e-01 3.426000000000000e-01 3.578400000000000e+00 Columns 4 through 5 2.769400000000000e+00 1.349900000000000e+00 z = -1 -1 0 0 0 d = 10 10 1 1 1 y = 4 3 3 2 1

4   Pass
%% x = [0.3000 -0.1 -0.00000002 0.5 0.002]; y_correct = [3 1 2 5 2]; assert(isequal(leadingDigit(x),y_correct))

a = Columns 1 through 3 3.000000000000000e-01 1.000000000000000e-01 2.000000000000000e-08 Columns 4 through 5 5.000000000000000e-01 2.000000000000000e-03 z = -1 -1 -8 -1 -3 d = 10 10 100000000 10 1000 y = 3 1 2 5 2