Hãy in các gía trị của mảng này theo thứ tự tăng dần sao cho các phần tử trùng nhau chỉ được in một lần.. Câu 4 Mỗi phân số được mô tả như sau : Type Phanso = Record tu, mau : Integer
Trang 1BÀI TẬP
Câu 1) Nhập một chuỗi St, xây dựng ba tập hợp:
S1 là tập các chữ hoa có trong St
S2 là tập các chữ thường có trong St
S3 là tập các chữ số có trong St
In các gía trị của mỗi tập S1, S2, S3 trên một dòng
Câu 2) Nhập vào một mảng A1, A2, , A10 các số nguyên dương < 10 Hãy
in các gía trị của mảng này theo thứ tự tăng dần sao cho các phần tử trùng nhau chỉ được in một lần Ví dụ : cho mảng 1, 6, 4,1, 9, 6, 6, 0, 3, 9 , in ra: 0,1, 3, 4, 6, 9 ( Hướng dẫn : xây dựng tập hợp gồm các phần tử của mảng A )
Câu 3) Viết chương trình thực hiện trò chơi sau:
Người chơi nhập một số k trong phạm vi từ 1 đến 9
Tạo một tập S gồm ba số ngẫu nhiên trong phạm vi từ 1 đến 9
Kiểm tra xem k có thuộc tập S không? Nếu thuộc thì người chơi thắng, ngược lại là thua In k và tập S lên màn hình
Trang 2Hướng dẫn: Trong thư viện CRT có hàm Random(n) trả về một số ngẫu
nhiên j thuộc phạm vi: 0 j < n
Câu 4) Mỗi phân số được mô tả như sau :
Type Phanso = Record
tu, mau : Integer;
end;
Nhập hai phân số từ bàn phím, tạo một tập tin chứa hai phân số đó và hai phân số là tổng, hiệu của chúng Ðọc bốn phân số đó từ tập tin và in lên màn hình
Câu 5) Nhập số nguyên dương N (0<N< 20 ) và một dãy N số nguyên : A1,
A2, , AN Ghi dãy số đó vào tập tin DL.DAT Ðếm trong tập tin DL.DAT
có bao nhiêu số chẵn Ðọc các số lẻ từ tập DL.DAT và in lên màn hình
Câu 6) Ðể quản lý Họ tên , các điểm Toán, Lý và Ðiểm trung bình của sinh
viên, ta mô tả kiểu Ksvien như sau :
Type
Ksvien= Record
Trang 3Hoten: String[20];
Toan, Ly, Dtb : Real;
end;
Hãy nhập một danh sách sinh viên gồm Họ tên, điểm Toán và điểm Lý, rồi tính Ðiểm trung bình: Dtb:=(Toán+Lý)/2, lưu vào tập tin QLY.DAT Quá trình nhập kết thúc khi nhập Họ tên là rỗng ( tức không nhập gì cả, cứ
Enter)
Ðọc danh sách sinh viên từ tập tin QLY.DAT và in danh sách lên màn hình
Chép danh sách sinh viên vào tập QLY.IDX sao cho các phần tử của
QLY.IDX được sắp xếp theo trật tự giảm của điểm trung bình
Ðọc dữ liệu của tập tin QLY.IDX và ghi vào tập tin văn bản tên là
QLY.TXT theo dạng :
STT Họ và tên
Ðiểm trung bình
Trang 42 Pham Thi Mai 8.0
Câu 7) Dùng hệ soạn thảo của Turbo Pascal để tạo một tập tin văn bản có
tên là MT.DAT chứa hai ma trận vuông cấp 3 là A và B có các phần tử là các số nguyên Lấy dữ liệu từ tập tin MT.DAT để tính ma trận C=A+B Ghi
ma trận C vào cuối tập tin MT.DAT Ðọc các ma trận A, B, C từ tập tin MT.DAT và in lên màn hình