... ghi nhớ Nạp (con trỏ) gốc vào danh sách; While danh sách không rỗng Begin Lấy nút từ danh sách, gọi Thăm N (chẳng hạn in giá trị Nạp trái N vào danh sách Nạp phải N vào danh sách End; N; nó); ... 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...
... Đề 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 Hoài Nhân ...
... 2/2 Đề 05 Tiếptheo:danhsách; end; Một danh sách móc nối từđiển phải thứ tự (tăng dần) tất từ phải khác ... chứa liệu tăng dần) - Nếu tìm thấy, hiểu thị thông báo “Đã có từ điển” - Nếu không tìm thấy, chèn vào Từđiển vị trí thích hợp Trình bày: Trần Hoà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 có ... 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...
... 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 thể loại ... khác sách với tham số so, tensach, 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 ... so,nam:integer); Cho phép thực thêm vào thư viện sách thuộc thể loại lvuc có tên tensach, tác giả nguoi viết vào năm nam, sách có số hiệu so - Nếu thể loại lvuc chưa có thư viện, tạo ghi thể loại, đặt vị trí...
... trang tr vào cuối danh sách tương ứng, xác định chữ từ n Chú ý: không phân biệt chữ thường, chữ hoa Procedure trichyeu; Nhằm tìm 10 từ khóa quan trọng nhất, nghĩa 10 từ xuất với tần xuất cao In ... 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 ... 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 dánh sách tương ứng, xác định chữ n Chú ý: không phần biệt chữ thường, chữ hoa Procedure...
... dánh sách họcsinh đỗ (có tổng điểm toán, lý, hóa lớn điểm chuẩn dchuan), danh sách trỏ bới trỏ danh sách họcsinh bị trượt, trỏ truot Yếu cầu: Không chép lại phần tử danh sánh lớp họcsinh sang ... 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ọcsinh name,...
... phố Viết hàm: Function DemDaiLy(First:TroTp):word; Trả số lượng đại lý toàn quốc Ghi chú: Cán coi thi không giải thích thêm Trình bày: Trần Hoài Nhân ...
... kết in thực 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 Hoài Nhân...
... T3 = 01101001 Lập chương trình đọc vào số 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: ... Bosung(ten:TroCLB; Club, Name:str25; t,m:byte); để bổ sung cầu thủ có tên Name, t tuổi mang số áo m vào câu lạc có tên Club Việc bổ sung đuợc thực trường hợp câu lạc Club có chưa có cầu thủ câu lạc...
... hàm trả giá trị NIL b Viết thủ tục: Procedure BoSungCB(var T:TroCB; Name:Str20); Để bổ sung cán vào T có trường Ten=Name DSNN=NIL c Viết thủ tục: Procedure CapNhat(T:TroCB; Name, FL:Str20; Level:Char); ... tên Name thông báo “Khong co can bo nay!” • Nếu cán tìm chưa biết ngữ FL, cần bổ sung thông tin vào đầu danh sách móc nối đơn • Nếu cán tìm biết ngoại ngữ FL, thay đổi cấp độ cũ cấp độ Level trường ... 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 ...
... Đị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 đ)...
... lưu địa nút đầu danh sách khác chứa mã mônhọ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ônhọc ghi gồm trường: MaM để lưu mã mônhọc đăng ký danh sách FirstS trường Tiep ... {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ônhọc ... ListOfSubjects(FirstT:TroGV; BMaGV:st8); để liệt kê mônhọc giáo viên có mã giáo viên BMaGV đảm nhiệm theo mẫu sau: STT … Tên mônhọc … Số đơn vị học trình … Trình bày: Trần Hoài Nhân 3/3 + Procedure...
... có danh sách mônhọc đăng ký ban đầu gồm mônhọc Subject Nếu có học viên này, bổ sung mônhọc có tên Subject vào cuối danh sách mônhọchọc viên đó, mônhọc chưa có danh sách; ngược lại, không ... điểm thi Mark mônhọc Subject cho họ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ônhọc Subject kèm điểm số Mark tương ứng Nếu không thấy mônhọc Subject học viên ... sách P mônhọ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ônhọc đăng...
... TroHam; TH1, TH2: St10) nhằm bổ sung tên hàm liên quan TH2 vào cuối danh sách hàm liên quan với hàm TH1, bổ sung tên hàm liên quan TH1 vào cuối danh sách hàm liên quan với hàm TH2, với điều kiện ... toán xếp theo kiểu bọt tốt thuật toán xếp theo kiểu lựa chọn? -Ghi chú: Cán coi thi không giải thích thêm Nguyễn Lý Hữu Huấn ...
... với nội dung Dong vào trước dòng có địa Vitri văn mà nút đầu trỏ trỏ Dau b) Viết thủ tục Chensau(Var Cuoi: Tro; Vitri: Tro; Dong: St80) cho phép chèn dòng với nội dung Dong vào sau dòng có địa ... giải thích sao? Tính số lần thực việc hoán đổi trường hợp -Ghi chú: Cán coi thi không giải thích thêm Nguyễn Lý Hữu Huấn ...