Cody

# Problem 1502. Perl 1: push

Solution 243956

Submitted on 14 May 2013 by Selvaraaju Murugesan
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 = [1 2 3 4 5]; y = [6 7 8]; [x, num] = push(x, y); y_correct = [1 2 3 4 5 6 7 8]; num_correct = 8; assert(isequal(x,y_correct) & isequal(num, num_correct));

2   Pass
%% x = [1 2 3 4 5]; y = 6; [x, num] = push(x, y); y_correct = [1 2 3 4 5 6]; num_correct = 6; assert(isequal(x,y_correct) & isequal(num, num_correct));

3   Pass
%% x = [1 2 3 4 5]'; y = [6 7 8]; [x, num] = push(x, y); y_correct = [1 2 3 4 5 6 7 8]'; num_correct = 8; assert(isequal(x,y_correct) & isequal(num, num_correct));

y = 1 2 3 4 5 6 7 8

4   Pass
%% x = []; y = [1 2 3]; [x, num] = push(x, y); y_correct = [1 2 3]; num_correct = 3; assert(isequal(x,y_correct) & isequal(num, num_correct));

5   Pass
%% x = [0.5 8.4 9.6]; y = [12.0 pi]; [x, num] = push(x, y); y_correct = [0.5 8.4 9.6 12.0 pi]; num_correct = 5; assert(isequal(x,y_correct) & isequal(num, num_correct));