Задачи по массивам

clear
clc
 
N = 50; % длинна вектора
x = randint(1,N,[1 10]); % вектор случ. чисел от 1 до 10
im = [];
 
% 1)y= max(x(2),x(4),x(6)....)-найти максимальное значение среди элементов
% с четными индексами
mx = x(2);
for i = 2:2:N % четные индексы
    if mx < x(i)
        mx = x(i);
    end
end
y = mx
 
% 2)y = x(n1) + x(n1+1)+...+x(nk),где n1,nk-индексы 1-ого и соответственно
% последнего максимального элемента с четным индексом в x
% (это если максимальных элементов больше 1,в противном случае y=0)
for i = 2:2:N
    if x(i) == mx 
        im(end+1) = i; % индексы макс. элементов
    end
end
 
y = 0;
if length(im)>1
    for i = im
        y = y + x(i);
    end
end
y

i = 2;
mx = x(2);
while i < N % четные индексы
    if mx < x(i)
        mx = x(i);
    end
    i = i + 2;
end
y = mx

clear
clc
 
% 3)отсортировать по не убыванию все неотрицательные элементы x
% ,непосредственно слева от которых находится отрицательный элемент,
% а все остальные элементы оставить на своих местах
N = 10;
a = randint(1,N,[-10 10])
 
ix = [];
x = [];
for i = 2:N
    if (a(i)>=0)&&(a(i-1)<0) % неотрицательные элементы слева от которых находится отрицательный элемент
        x(end+1) = a(i); % сохраняем искомый элемент в отдельный массив
        ix(end+1) = i; % индекс искомого элемента
    end
end
x % выводим массив искомых элементов
x = sort(x) % сортируем по возрастанию
a(ix) = x % возвращаем отсортированные элементы в массив на их места

a = randint(1,10,[1 20]) % случайный вектор
 
for i=1:length(a)
    for j=1:length(a)-1
        if a(j)>a(j+1) % если предидущий больше меняем их местами
            a1=a(j);
            a(j)=a(j+1);
            a(j+1)=a1;
        end
    end
end
a

clear
clc
 
% 3)отсортировать по не убыванию все неотрицательные элементы x
% ,непосредственно слева от которых находится отрицательный элемент,
% а все остальные элементы оставить на своих местах
N = 10;
a = randint(1,N,[-10 10])
 
ix = [];
x = [];
for i = 2:N
    if (a(i)>=0)&&(a(i-1)<0) % неотрицательные элементы слева от которых находится отрицательный элемент
        x(end+1) = a(i); % сохраняем искомый элемент в отдельный массив
        ix(end+1) = i; % индекс искомого элемента
    end
end
 
% сортируем по возрастанию
for i=1:length(x)
    for j=1:length(x)-1
        if x(j)>x(j+1) % если предидущий больше меняем их местами
            x1 = x(j);
            x(j) = x(j+1);
            x(j+1) = x1;
        end
    end
end
a(ix) = x % возвращаем отсортированные элементы в массив на их места