Đề 04
1/2

Đề thi tuyển NCS và Cao học 6/1994 (Đề số 1)
Môn thi: Phương pháp lập trình
Thời gian 180’ - Được sử dụng tài liệu Bài 1. Người ta viết một chương trình trên Pascal chuẩn, để tính giai thừa của một
số nguyên không âm như sau:
Program Giaithua(input,output)
Label 99;
Type tunhien = 0..maxint;
Var x,y:tunhien;

Procedure halt;
Begin
Goto 99;
End;

Procedure fact(var n,f:tunhien);
Var k:so;
Begin
k:=0; f:=1;
While k<>n do
Begin
K:=k+1;
If (f > (maxint div k)) then halt
Else f:=f*k;
End;
End;

- Mỗi nút có các trường: Ctrai trỏ tới nút con trái, Cphai trỏ tới nút con phải,
một trường LoaiNut cho biết nút này ứng với +,-,*,/,#,↑ hay toán hạng. Nếu
loại nút là # thì chỉ có con phải, còn nếu loại nút là toán hạng thì không có
các cây con trái, phải và nút có thêm một trường chứa trị (Thực) của toán
hạng.
a. Hãy viết các khai báo (trong Pascal) cho cây như trên.
b. Giả sử đã có một cây (xây dựng đúng yêu cầu trên), trỏ bởi một con trỏ T.
Hãy viết một hàm (Function) cho phép tính giá trị của biểu thức tương ứng
với cây đó.
Trình bày: Trần Hoài Nhân