Problem 1502. Perl 1: push

Solution 258582

Submitted on 10 Jun 2013 by Suman Saha

This solution is locked. To view this solution, you need to provide a solution of the same size or smaller.

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)); yy = 8 ans = []
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)); yy = 6 ans = []
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)); yy = 8 ans = []
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)); yy = 3 ans = []
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)); yy = 5 ans = []