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

1/2
BỘ GIÁO DỤC & ĐÀO TẠO Họ và tên thí sinh:..................................................
ĐẠI HỌC HUẾ Số báo danh:..................................................


KỲ THI TUYỂN SINH SAU ĐẠI HỌC NĂM 2002
Môn thi: Ngôn ngữ lập trình
(Dành cho cao học)
Thời gian làm: 180 phút


Câu 1. Cho khai báo một danh dách liên kết đơn như sau:
type TroNut=^Nut;
Nut=record
giatri:integer;
t
end;
iep:TroNut;
var First:TroNut;

Viết thủ tục đệ quy:
procedure InNguoc(First:TroNut);
thực hiện việc in giá trị (trường giatri) các nút theo thứ tự ngược lại.

Câu 2. Người ta biển diễn thông tin về các nhạc sĩ dưới dạng một cây nhị phân tìm
kiếm có khoá TenNS (tên nhạc sĩ). Mỗi nút của cây là một bản ghi gồm trường
TenNS và 3 trường con trỏ: Left, Right, First. Hai con trỏ Left và Right lần lượt trỏ
tới hai nút con trái và con phải của nút đó, con trỏ First trỏ tới phần tử đầu của một
danh sách liên kết đơn chứa thông tin các bản nhạc của nhạc sĩ. Mỗi phần tử của
danh sách này là một bản ghi gồm 3 trường: TenBH (tên bài hát), Nam (năm ra đời
bài hát) và Next (lưu địa chỉ của phần tử tiếp theo trong danh sách). Danh sách này

được sắp theo thứ tự tăng dần của Nam.
Người ta cho khai báo của cấu trúc dữ liệu nói trên như sau:
type St25=String[25];
TroNP=^Nhacphan;
NhacPham=record
TenBH:String;
Nam:word;
Next:TroNP;
end;
TroNS=^nut;
Nut=record
TenNS:st25;
First:TroNP;
Left,Right:TroNS;
end;
var Top:TroNS;

1. Viết hàm
Function NumSong(Name:st25):byte;
trả về các nhạc phẩm của nhạc sĩ có tên Name.
2. Viết thủ tục
Trình bày: Trần Hoài Nhân

2/2
Procedure LastSong(Name:St25);
in lên các bài hát ra đời trong năm cuối cùng (trong danh sách) của nhạc sĩ
có tên Name.

Câu 3. Cho một chương trình viết theo Pascal như sau:
var x:integer;

Procedure Them2Bot1(var x:integer; y:integer);
begin
writeln(x,y:4); inc(x,2);
if y>0 then
begin
dec(y); Them2Bot1(x,y);
end;
writeln(x,y:4);
end;
BEGIN
x:=5;Them2Bot1(x,x);
END.

Hãy viết các kết quả in ra khi thực hiện chương trình trên.

Câu 4. Viết chương trình đọc vào một số tự nhiên n, sau đó cho in ra tất cả các số
nguyên tố không nhỏ hơn 2 và không lớn hớn n.


Ghi chú: Cán bộ coi thi không được giải thích gì thêm.
Trình bày: Trần Hoài Nhân