Kiểu dữ liệu có cấu trúc

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Như Quỳnh Nguyễn

Cho chương trình sau

Program Xep_so;

Const T = 10;

Var M : Array[ 1 . . T ] of Integer;

Tg, i, j: Integer;

Begin

For i: = 1 to T do

Begin

Write(‘Hay nhap gia tri so thu’ , i , ’la :’);

Readln(M[ i ]);

End;

For i : = 1 to T - 1 do

For j : = i + 1 to T do

Begin

If M[ i ] > M[ j ] then

Begin

Tg: = M[ i ];

M[ i ]: = M[ j ];

M[ j ]: = Tg;

End;

End;

Writeln(‘ KET QUA SU CHUONG TRINH CHAY LA:’);

For i: = 1 to T do Writeln(M[ i ]);

Readln

End.

A. Cho biết đoạn chương trình này làm gì?

Nguyễn Lê Phước Thịnh
11 tháng 4 2020 lúc 16:21

Sắp xếp tăng dần dãy số


Các câu hỏi tương tự
man ok
Xem chi tiết
Phong Thanh
Xem chi tiết
quocky123112
Xem chi tiết
Khoi Tran
Xem chi tiết
man ok
Xem chi tiết
Học Thái
Xem chi tiết
Pat
Xem chi tiết
Lê Tiến Đạt
Xem chi tiết
Hào Cao Nhật
Xem chi tiết