Diễn Đàn Pascal
Bạn có muốn phản ứng với tin nhắn này? Vui lòng đăng ký diễn đàn trong một vài cú nhấp chuột hoặc đăng nhập để tiếp tục.

pascal 11.....................

Go down

pascal 11..................... Empty pascal 11.....................

Bài gửi by dapxe 18/1/2011, 3:54 pm

Bảng kết quả của 1 giải vô địch bóng đá được cho bởi ma trận vuôn
A(N,N). Các ptử ở đường chéo chính bằng 0, đội i thắng đội j thì
A[i,j]=2, hòa thì A[i,j]=1, thua thì A[i,j]=0. Nhập ma trận vuông A[N,N]
từ bàn phím (N<10).
a/ Tìm các đội có số trận thắng lớn hơn số trận thua
b/ Tìm đội không thua trận nào
Huớng dẫn
_ Khai bo
+ Mảng A 2 chiều gồm N đội (kiểu integer).
+ Biến i,j sử dụng 2 câu lềnh for ( để nhập dliệu)
+ Biến temp để làm biến trung gian dùng để sắp xếp
_ Nhập dl cho mảng A bằng các sd hàm Randomize(3) để tạo dk cho mảng A một cách ngẫu nhiên. Giá trị các ptử A[I,j] sẽ nhận là 0,1,2.
_ Gán các giá trị cho các ptử có số dòng và số cột bằng nhau = 0 (kq của đội cần xét với chính nó.)
_ Duyệt mảng và tính số lần A[I,j]=2 của từng đội để hiển thị đội có số trận thắng nhiều nhất.
_ Tương tự để tìm đội thua nhiều nhất A[I,j]=0
_ Tìm đội có số trận thua bằng 1 (vì đã gán A[I,j]=0)
dapxe
dapxe
Thành viên mới
Thành viên mới

Nam Ngày sinh : 06/09/1994
Tuổi : 29
Ngày đăng ký : 18/01/2011

Về Đầu Trang Go down

Về Đầu Trang

- Similar topics

 
Permissions in this forum:
Bạn không có quyền trả lời bài viết