clc; clear;
 
A=[4, 3, 6, 9, 7];
disp('Matrix A:'); disp(A);
 
B=sort(A,'ascend');
disp('Matrix A in ascending order:'); disp(B);
 
C=sort(A,'descend');
disp('Matrix A in descending order:'); disp(C);
 
[D,indexD]=sort(A,'ascend');
[E,indexE]=sort(A,'descend');
fprintf('(Matrix_A) (D=A-->йата ауноуса)(аявийес хесеис деийтым тоу A)(е=A-->йата жхимоуса)(аявийес хесеис деийтым тоу A)\n');
Z=[A' D' indexD' E' indexE']; %окои ои пимайес апохгйеуомтаи ыс стгкес се ема дисдиастато пимайа ф
Z