Chủ đề:
Bài 11: Kiểu mảngCâu hỏi:
Viết CT nhập vào cân nặng của học sinh lớp 11. Đếm xem có bao nhiều học sinh có cân nặng > 50,0kg
Ghi đầy đủ giúp mình với ạ:(( Thanks
Cập nhật ảnh bìa
Tải lên
Từ máy tính của bạn
Cập nhật ảnh đại diện
Tải lên
Từ máy tính của bạn
Học tại trường
Chưa có thông tin
Đến từ
Chưa có thông tin , Chưa có thông tin
Số lượng câu hỏi
2
Số lượng câu trả lời
4
Điểm GP
0
Điểm SP
1
Người theo dõi (0)
Đang theo dõi (0)
Chủ đề:
Kiểu dữ liệu có cấu trúcCâu hỏi:
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ì?