[وسيم الإتحاد]

x=input ('enter an arrey') ;h
n=lenght(x);h
for j = 1:n-1
for i 1:n-1
if x(i) > x(i+1)h
t = x(i);h
x(i) = x(i+1);h
x(i+1) = t;h
end
end
end
disp (x);h

هذا البرنامج مكتوب نصا في الدفتر أعطانا هو الدكتور علاء جوده بس يرتب تصاعديا
لاحظ إن كلh مكتوبة غير موجودة في البرنامج لكن أنا كتبتها عشان يترتب البرنامج ويظهر لك بشكل واضح فلا تهتم لها