BÀI GIẢNG KIỂU BẢN GHI

CÁC THẦY CÔ GIÁO VÀ CÁC EM HỌC SINH Quan sát ví dụ sau: BẢNG KẾT QUẢ THI SB D Hoten Toan Van A1 Nguyễn An 10.0 9.0 8.5 5.0 … … 6.0 4.5 A2 Vũ Anh … … A50 Phan Vân Một đối tượng Tong KQ … … Thuộc tính TRƯỜNG THPT PHÚ NHUẬN GV: Đinh Mỹ Vân Dữ liệu kiểu ghi (record) Dùng để mô tả đối tượng có số thuộc tính mà thuộc tính có kiểu liệu khác SB D Hoten Toan Van Nguyễn A1 An 10.0 9.0 A2 Vũ Anh 8.5 5.0 … … 6.0 4.5 … … A50 Phan Vân Một đối tượng Tong KQ … … Thuộc tính Dữ liệu kiểu ghi (record) Dùng để mô tả đối tượng có số thuộc tính mà thuộc tính có kiểu liệu khác VD: B¶NG L¦¥NG NH¢N VI£N STT Họ tên Trần Bình GĐ 50000 Ngày cơng 28 Ngơ Qn NV 25000 28 … … … … … Chức vụ LCB/ngày Lương lãnh … Dữ liệu kiểu ghi (record) VD: Bảng lượt mượn sách thư viện Họ tên Mã Tên sá sách ch Ngày mượn Ngày trả Nguyễn Thò Huệ VH Truyện Kiều 1/1/1990 7/1/1990 Dương Trúc Lâm TH Giải tích 2/1/1990 5/1/1990 ………… … … … … Khai báo Đònh nghóa kiểu ghi khai báo biến: Type = Record : ; ……………………………………… …………………… : ; End; Var : ; VD1: B¶ng kÕt qu¶ thi SBD Hoten Toan Van A1 Nguyễn An 10.0 9.0 A2 Vũ Anh 8.5 5.0 … … … … Tong KQ … … Type = Record : ; ……………………………………… …………………… : ; End; Var : ; VD1: B¶ng kÕt qu¶ thi SB D Hoten Toan Van Nguyễn A1 An 10.0 9.0 A2 Vũ Anh 8.5 5.0 … … … … Tong KQ … … Phan Type A50 Hocsinh = Record 6.0 Vân 4.5 SBD: string[5]; Hoten: string[30]; Toan,Van,Tong: real; KQ: string[10]; Var A, B : Hocsinh; End; Lop : array[1 50] of Đònh nghóa kiểu ghi có tên Hocsinh Khai báo biến Var A, B : Hocsinh; Tổ Click chức to add lưuTitle nhớ A SB D Hoten Toan Van Tong KQ B SB D Hoten Toan Van Tong KQ Lop : array[1 50] of Hocsinh; Lop SB D : : … 50 Hoten Toan Van Tong KQ …… …… … …… VD2: B¶NG L¦¥NG NH¢N VI£N STT Họ tên Trần Bình GĐ 50000 Ngày cơng 28 Ngơ Qn NV 25000 28 … … … … … Chức vụ LCB/ngày Type NHANVIEN = Record STT : integer; Hoten : string[30]; CV : string[3]; NC : byte; LCB, Luong: End; real; Var BL: array[1 50] of NHANVIEN; Lương lãnh … Tham chiếu đến thuộc tính ghi Ví dụ: A A Hoten SBD Hoten Ly An ‘Ly An’ Toan Van Tong KQ Tham chiếu đến thuộc tính ghi Ví dụ: Lop A Hoten ‘Ly An’ Lop[2] Toan 8.5 SB D A1 Hoten Nguyen An : : A2 Vu Anh … …… 50 Ton Toan Van g 10 9.0 8.5 KQ 5.0 …… … …… Gán giá trò GÁN GIÁ TRỊ DÙNG CÂU LỆNH GÁN NHẬP TỪ BÀN PHÍM Gán giá trò 3.1) Gán hai ghi: Dùng câu lệnh gán A := B ; A B SBD Hoten Toan Van 9.0 7.0 SBD Hoten Toan Van 9.0 7.0 Le Van Le Van Tong KQ Tong KQ Gán giá trò 3.1) Gán hai ghi: Dùng câu lệnh gán A := B ; Lop[1] := Lop[2] ; Lop SBD Hoten Vũ Anh A2 Vũ Anh A2 : : … …… 50 A50 Phan Vân Toa n 8.5 Van 5.0 8.5 5.0 …… … 6.0 4.5 Tong KQ …… Gán giá trò 3.2) Gán giá trò cho trường: a) Dùng câu lệnh gán: A Hoten := ‘Trần Tuấn’; Gán họ tên “Trần Tuấn” vào ghi A A SBD Hoten Toan Trần Tuấn Van Tong KQ Gán giá trò 3.2) Gán giá trò cho trường: a) Dùng câu lệnh gán: A Hoten := ‘Trần Tuấn’; A Hoten := B Hoten ; A SBD Hoten B SBD Hoten A1 A2 Toan Le Van 6.0 Toan Le Van 9.0 Van Tong KQ Tong KQ 8.0 Van 7.0 Gán giá trò 3.2) Gán giá trò cho trường: a) Dùng câu lệnh gán: A Hoten := ‘Trần Tuấn’; A Hoten := B Hoten ; Lop[1] Toan := Lop[2] Toan ; Lop Toa n 8.5 Van Vũ Anh 8.5 5.0 …… …… … Phan Vân 6.0 SBD Hoten A1 : A2 : … 50 A50 Nguyễn An Tong KQ 17.5 9.0 4.5 Lop[1] Tong := Lop[1] Toan + …… Gán giá trò 3.2) Gán giá trò cho trường: b) Nhập từ bàn phím: Lop SBD Hoten Toan Van Tong : : 50 Readln(LOP[1].SBD); Readln(LOP[1].Hoten); Readln(LOP[1].Toan); Readln(LOP[1].Van); KQ Hãy nhớ! Type Hocsinh = Record SBD: string[5]; Hoten: string[30]; Toan,Van,Tong: real; KQ: string[10]; End; Var LOP: ARRAY[1 50] of hocsinh; LOP[i] SBD  Khai báo: Đònh nghóa kiểu ghi khai báo biến Type = Record : ; : ; end; : ghi: Tên biến ghi.tên  Gán giá trò cho trường trường ghi hai biến kiểu