Bai tap mang

Mang
Mang mot chieu: Mang mot chieu
Bài 1 - a: Hãy tìm hiểu và chạy thử chương trình thực hiện thuật toán sắp xếp dãy số nguyên bằng thuật toán tráo đổi với các giá trị khác nhau của n dưới đây. Bài 1 - b. Khai báo thêm biến nguyên Dem và bổ sung vào chương trình những câu lệnh cần thiết để biến Dem tính số lần thực hiện tráo đổi trong thuật toán. Đưa kết quả tìm được ra màn hình. Chuong trinh 1:
Program Bai1; Type Arrnt=array[1..nmax] of integer; Var n, i, j, t: integer; A:arriint; Begin Randomize; Write(‘nhap n=’); Readln(n); For i:=1 to n do A[i]:=random(300) - random(300); For i:=1 to n do write(A[i]:5); Writeln; For j:=n downto 2 do For i:=1 to i - 1 do If 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]:7); Readln End. Chuong trinh 1b: Bai tap
Câu lệnh thêm vào chương trình Hướng dẫn phần 1b Dem:=0; For j:=n downto 2 do For i:=1 to i - 1 do If A[i] >A[i 1] then Begin t:=A[i];A[i]:=A[i 1]; A[i 1]:=t; dem:=dem 1; End;