SẮP XẾP DÃY A THÀNH DÃY KHÔNG GIẢM.INPUT A = 1 -4 5 6 -7OUTPU...

6.

Sắp xếp dãy a thành dãy không giảm

.

Input A = 1 -4 5 6 -7Output A = -7 -4 1 5 6 Xác định bài toán:- Input: mảng a- Output: mảng a là dãy không tăng Thuật toán:- B1Nhập n, a

1

,a

2

, …, a

n

- B2: m n- B3: Nếu M < 2 thì đưa ra dãy a đã được sắp xếp rồi kết thúc- B4: m  m – 1, i  0- B5: i i + 1

-

B6: Nếu i > M thì quay lại bước 3;

-

B7: nếu a

i

> a

i + 1

, thì tráo đổi a

i

và a

i+1

cho nhau- B8: quay lại bước 5. Chương trình: program sxkhonggiam;uses crt;var n,i,m,j:byte; a:array[1..15] of integer; t:integer;beginclrscr; write('nhap so luong phan tu: '); readln(n); for i:=1 to n do begin write('nhap phan tu a[',i,'] = '); readln(a[i]); end; for j:=n downto 2 do for i:= 1 to j-1 doif a[i] > a[i+1] then begin t:=a[i];a[i]:=a[i+1];a[i+1]:=t; end; writeln(' Day so sau khi sap xep: ’);for i:=1 to n do write(a[i]:4);readln