Đề thi tuyển sinh Cao học và nghiên cứu sinh môn Ngôn ngữ lập trình 1995

Đề 05
1/2

Đề thì tuyển Nghiên cứu sinh và Cao học 1995 (Đề B)
Môn: Phương pháp lập trình
Thời gian: 180 phút – Được sử dụng tài liệu


Bài 1. Cho khai báo kiểu của một danh sách tuyến tính móc nối như sau:
Type tro = ^kieupt;
Kieupt=record
Giatri:interger;
Tieptheo:tro;
End;

a. Cho:
Var ds,q:tro;

Trong đó ds trỏ tới đầu của một danh sách tuyến tính. Hãy viết một thủ tục:
Procedure LayMax(var ds,q:tro);
Cho phép lấy phần tử có giá trị lớn nhất ra khỏi danh sách tuyến tính ds,
phần tử đó sẽ được trỏ bới q.
b. Cho:
Var ds1,ds2:tro;
Trong đó ds1 trỏ đầu của một danh sách tuyến tính chưa được sắp xếp theo
trường giá trị, còn ds2 thì đã được khởi gán ds2:=NIL. Hãy viết một thủ tục:
Procedure SapChon(var ds1,ds2:tro);
Cho phép chọn dần các phần tử trong ds1 từ giá trị lớn đến bé, đưa vào ds2
để rốt cục thì ds1=nil, còn ds2 trỏ tới một danh sách tuyến tính gồm mọi
phần tử cũ của ds1, nhưng đã sắp theo thứ tự của trường giá trị.

Bài 2. Cho khai báo của một cây nhị phân như sau:
Type trỏ=^ nút;
Nút = record
Giátrị:interger;
Ctrái, CPhải:trỏ;
End;
Var gốc:trỏ {trỏ tới nút gốc của cây}

Hãy lập hàm:
Function Copy(gốc: trỏ): trỏ;
Cho phép trả lại địa chỉ của
gốc một cây mới, cây này được thành lập như là một bản sao cây đã cho (trỏ bới
gốc).

Bài 3. Cho một tệp (tập tin) văn bản, trong đó có chứa các từ. Các dấu phân cách
từ là: dấu trắng, dấu phẩy, dấu chấm phẩy, dấu hai chấm, dấu chấm than, dấu chấm
hỏi. Mọi từ đều bắt đầu bằng một ký tự trong tập [‘A’.. ‘Z’]
a. Viết một thủ tục cho phép đọc các từ trong tệp văn bản đã cho và lưu các từ
đó vào mảng các danh sách móc nối:
Từđiển:array[‘A’..’Z’] of danhsách;
Trong đó kiểu danhsách được cho như sau:
Type danhsách = ^kiểupt;
Kiểupt = record
Từ:strinh[10];
Trình bày: Trần Hoài Nhân

Đề 05
2/2

Tiếptheo:danhsách;

end;
Một danh sách móc nối trong từđiển đều phải sắp thứ tự (tăng dần) và tất cả
các từ phải khác nhau.
b. Viết một thủ tục hiển thị tất cả các từ ra màn hình theo thứ tự tăng dần.
c. Viết một thủ tục bổ sung một từ mới, bằng cách đọc từ đó từ bàn phím, tìm
nó trong Từđiển (dùng phép tìm kiếm tuần tự trong danh sách móc nối chứa
dữ liệu tăng dần).
- Nếu tìm thấy, hiểu thị thông báo “Đã có trong từ điển”
- Nếu không tìm thấy, chèn nó vào trong Từđiển ở vị trí thích hợp.
Trình bày: Trần Hoài Nhân