... 2/2 Đề 04 End; Var t:tro; {trỏ gốc cây} Hãy lập hàm: Function copy(T:tro):tro; Cho phép, với có gốc trỏ T, lập (ở nhớ trong) cho lại địa gốc Bài Với nhị phân khai ... danh sách a Hãy cho biết giải thuật S, Q duyệt sau theo thứ tự nào? b Từ gợi ý sơ đồ trên, viết thủ tục duyệt nhị phân theo thứ tự preorder (gốc-trái-phải) Chú ý không phá hoại cho cố gắng loại...
... Đề 04 2/2 Bài Người ta diễn tả biểu thức số học infix nhị phân sau: - Các nút chứa tốn tử (+,-,*,/,#,↑) Trong # phép tốn ... LoaiNut cho biết nút ứng với +,-,*,/,#,↑ hay toán hạng Nếu loại nút # có phải, loại nút tốn hạng khơng có trái, phải nút có thêm trường chứa trị (Thực) toán hạng a Hãy viết khai báo (trong Pascal) cho ... khai báo (trong Pascal) cho b Giả sử có (xây dựng yêu cầu trên), trỏ trỏ T Hãy viết hàm (Function) cho phép tính giá trị biểu thức tương ứng với Trình bày: Trần Hồi Nhân ...
... Đề 10 2/2 b Hãy khai báo Pascal trên, viết hàm (Function) cho phép tính giá trị trỏ bới trỏ T cho trước (giả thi t TNIL) Trình bày: Trần Hồi Nhân ...
... Dong:str80; Sau:tro; End; Var dau,cuoi:tro; {đều NIL văn rỗng} a Viết thủ tục dạng: Procedure XenTruoc(var d:tro;p:tro;s:str80); Cho phép xen dòng với nội dung cho s vào trước phần tử trỏ p danh sách ... db,cb,noiden:tro); Cho phép chuyển dời Bloc(db,cb) tới trước dòng trỏ noiden danhsach(d,c), giả sử noiden không Bloc c Viết thủ tục: Procedure chepBl(var d:tro; db,cb,noiden:tro); Cho phép chép (mà ... 2/2 Đề 15 Đầu Dòng Đầu Dòng Cuối … … Cuối Trường hợp văn rỗng Dòng n Trường hợp chung Khai báo danh...
... trích từ thư viện cho tác phẩm thể loại tác giả author (giả thi t tác giả có tên khác nhau) Các tác phẩm tạo thành danh sách móc nối sách (không phân biệt thể loại), mà đầu cho biến tuyen Các ... nguoi, nam cho - Nếu thể loại sách có, thêm vào danh sách móc nối tương ứng ghi sách vào cuối danh sách (chú ý kiểm tra so cuổn sách có danh sách chưa) Function CuNhat(var l:troloai):integer; Cho kết ... 2/2 Đề 17 Hãy viết chương trình con: Procedure Them(var l:troloai; lvuc,tensach,nguoi:str25; so,nam:integer); Cho phép thực thêm vào thư viện sách thuộc...
... cho thành dẫn con: - chidan1 bao gồm xuất thừ khóa có số ≤tr cho - chidan2 bao gồm xuất từ khóa trang có số >tr cho Procedure Inchidan; Cho phép in theo qui cách từ khóa với số trang tương ứng: ... xuất với tần xuất cao In từ với từ dòng theo thứ tự giảm dần số lần xuất với tần xuất xuất tương ứng Procedure tach(tr:integer; var chidan1,chidan2:Index); Nhằm tách dẫn chidan cho thành dẫn con: ... 2/2 Đề 18 Tiep:tro; end; index=array[‘a’ ’z’]of tro; Var chidan:index; Keyword:array[1 50]of str25;...
... 2/2 Đề 19 Var chidan:index; Keyword:array[1 50]of str25; Hãy lập thủ tục thao tác danh sách hình: a ... Procedure Them(n:str25;tr:integer); Thực công việc kiểm tra xem từ n có thuộc mảng từ khóa keyword cho trước hay không Nếu n không thuộc, không làm Nếu n thuộc, thêm từ n với số trang tr vào cuối...
... name, điểm tốn, lý, hóa cho t, l, h tương ứng với nút đặt cuối danh sách lớp nhớ trỏ Dau Procedure ketqua(dchuan:real; dau:tro; var do, truot:tro); Cho phép thông báo dánh sách học sinh đỗ (có tổng ... dchuan), danh sách trỏ bới trỏ danh sách học sinh bị trượt, trỏ truot Yếu cầu: Không chép lại phần tử danh sánh lớphọc sinh sang vùng nhớ danh sách cho Trình bày: Trần Hồi Nhân ... 2/2 Đề 11 Đầu danh sách trỏ biến dau Var dau:tro; Hãy viết chường trình con: Procedure Nhap(var dau:tro; sh:integer; name:alpha; t,l,h:real); Cho phép nhập số hiệu sh, tên học sinh name,...
... 2/2 Đề 01 • Dòng chứa số n • N dòng tiếp theo, dòng chứa cặp số ai, bi Và lưu vào cấu trúc A Xác định dãy Domino từ tập A cho Xác định dãy Domino có số cặp giá trị lớn Bài Cho khai báo ... end; Var goc:tro; Hãy lập chương trình thực công việc sau: Hàm Function CayTK(Goc:tro):boolean; cho phép kiểm tra xem có gốc trỏ goc có phải nhị phân tìm kiếm hay khơng Chú ý: Cây rỗng coi tìm ... phương pháp đệ quy không đệ quy Trường hợp ban đầu tìm kiếm, viết thủ tục Procedure saplai(goc:tro); Cho phép tráo đổi nội dung nút cây, không thay đổi cấu trúc cây, để nhận nhị phân tìm kiếm Chẳng...
... đến đầu danh sách thành phố} Viết thủ tục: Procedure Xoa(Var First:TroTP; Thpho:St25; DT:St8); Cho phép xóa đại lý có số điện thoại DT thuộc thành phố có tên Thpho khỏi danh sách đại lý Nếu thành ... phố Viết hàm: Function DemDaiLy(First:TroTp):word; Trả số lượng đại lý tồn quốc Ghi chú: Cán coi thi khơng giải thích thêm Trình bày: Trần Hồi Nhân ...
... chương trình Câu Viết chương trình đọc vào số tự nhiên n, sau cho in tất số nguyên tố không nhỏ không lớn hớn n Ghi chú: Cán coi thi khơng giải thích thêm Trình bày: Trần Hồi Nhân ... Procedure LastSong(Name:St25); in lên hát đời năm cuối (trong danh sách) nhạc sĩ có tên Name Câu Cho chương trình viết theo Pascal sau: var x:integer; Procedure Them2Bot1(var x:integer; y:integer);...
... số áo m khỏi câu lạc Club d Viết hàm: Function TuoiMin(Club:st25):byte; cho biết tuổi cầu thủ trẻ câu lạc có tên Club Câu Cho chuỗi chữ số nhị phân Tn xác lập theo quy tắc sau: - T0 = - Với i = ... tự nhiên n hiễn thị chuỗi Tn Câu Viết chương trình đọc vào số tự nhiên số 10, cho in số dạng số Ghi chú: Cán coi thi khơng giải thích thêm Trình bày: Trần Hồi Nhân ...
... thuộc trái phải nút N Viết hàm Function LaDong(T:TroNut):boolean; cho kết True T đống, ngược lại trả giá trị False Ghi chú: Cán coi thi khơng giải thích thêm Trình bày: Trần Hoài Nhân ... ĐỘ NGOẠI NGỮ CỦA CÁC CÁN BỘ AN: ANH-B BINH: ANH-C, NGA-B, PHAP-A CHI: Khong biet thu tieng … Câu Cho nhị phân có khai báo sau: Type TroNut=^Nut; Nut=record Info:integer; Left,right:TroNut; End; ... 2/2 a Viết hàm: Function DinhViCB(f:TroCB; Name:Str20):TroCB; Cho kết địa nút T mà trường Ten có giá trị Name Nếu khơng tìm thấy nút hàm trả giá trị NIL b Viết...
... Định vị đến nút giáo viên cần tìm (có sử dụng danh sách tăng dần): 0,5 đ * Duyệt danh sách mã môn học: 0,5 đ * In theo mẫu: 0,5 đ Procedure ListOfTeachers(FirstT: TroGV; BMaM: Integer); (1,5 đ)...
... {Mã mơn học: trường khóa} {Tên mơn học} {Số đơn vị học trình} {Địa nút danh sách} a Viết hàm Function Addr(First: TroMH; BMaMH:integer):TroMH; trả địa nút thuộc danh sách FirstS có mã mơn học BMaMH, ... lưu địa nút đầu danh sách khác chứa mã môn học giáo viên đảm nhiệm (gọi danh sách môn học) Mỗi nút danh sách môn học ghi gồm trường: MaM để lưu mã môn học đăng ký danh sách FirstS trường Tiep lưu ... ListOfSubjects(FirstT:TroGV; BMaGV:st8); để liệt kê môn học giáo viên có mã giáo viên BMaGV đảm nhiệm theo mẫu sau: STT … Tên môn học … Số đơn vị học trình … Trình bày: Trần Hồi Nhân 3/3 + Procedure...
... điểm thi Mark môn học Subject chohọc viên Name Nếu khơng tìm thấy học viên Name thực việc bổ sung học viên Name môn học Subject kèm điểm số Mark tương ứng Nếu không thấy môn học Subject học viên ... danh sách môn học đăng ký ban đầu gồm môn học Subject Nếu có học viên này, bổ sung mơn học có tên Subject vào cuối danh sách mơn họchọc viên đó, mơn học chưa có danh sách; ngược lại, khơng làm ... sách P mơn học có tên Subject c Viết thủ tục: Procedure Bosung(F: TroHV; Name,Subject:st20); Để bổ sung học viên có tên Name vào danh sách F chưa có học viên học viên có danh sách môn học đăng...
... thời gian thực thuật toán xếp lựa chọn độc lập với liệu xếp? c) Cho dãy số 4, 3, 8, 22, 1, Khi sử dụng thuật toán xếp lựa chọn, cho biết kết biến đổi dãy số sau lần hoán vị d) Trong trường hợp ... Giả sử giá trị trường Muc tất nút T xác định Viết hàm DemSoNut(T: TroNut; Level: Byte): Integer cho kết số nút T có giá trị trường Muc Level Câu 4: a) Viết thủ tục xếp mảng số nguyên theo kiểu ... vào cuối danh sách hàm liên quan với hàm TH2, với điều kiện tên hàm TH1 TH2 có danh sách F Câu 3: Cho nhị phân T (nút gốc trỏ T) có khai báo sau: Type TroNut = ^Nut; Nut = Record Muc: Byte; Left,...