Công ty Cổ phần Mạng giáo dục Bạch Kim - 27 Huỳnh Thúc Kháng, Đống Đa, Hà Nội
Trang bìa
Trang bìa:
TIẾT 36: KIỂU BẢN GHI Dữ liệu bản ghi, khai báo kiểu bản ghi
Dữ liệu bản ghi:
1. Dữ liệu bản ghi Dùng để mô tả các đối tượng có cùng một số thuộc tính mà các thuộc tính có thể có kiểu dữ liệu khác nhau. * Ví dụ Bảng kết quả thi gồm thông tin về các thí sinh như họ tên, số báo danh, điểm toán, văn Khai báo kiểu bản ghi:
2. Khai báo kiểu bản ghi Type < tên kiểu bản ghi> = record : kiểu trường 1; < tên trường 2> : kiểu trường 2; end; Var : ; : ARRAY[1..Max] of < tên kiểu bản ghi>; Khai báo kiểu bản ghi_tiếp:
2. Khai báo kiểu bản ghi * Ví dụ Type Hocsinh = record SBD: integer; Hoten: string[30]; Toan,Van,Tong: real; Ketqua: string[10]; end; Khai báo kiểu dữ liệu cho các trường (field) Var LOP: ARRAY[1..50] of Hocsinh; I,j,n : integer; Khai báo biến kiểu bản ghi (record) Tham chiếu đến từng trường của bản ghi
Tham chiếu đến từng trường của bản ghi:
3. Tham chiếu đến từng trường của bản ghi Tênbiến.têntrường * Ví dụ Nhập thông tin học sinh Các bước Thể hiện bằng Pascal - Nhập số học sinh Write(‘ Nhap vao so hoc sinh trong lop : ‘); readln(n); - Nhập dữ liệu (các thuộc tính) của từng bản ghi For i:=1 to n do Begin writeln(‘ Nhap du lieu cho hoc sinh thu ‘,i); Write(‘ SBD : ‘); readln(LOP[i].SBD); Write(‘HO TEN : ‘); readln(LOP[i].Hoten); Write(‘ Diem toan : ‘);readln(LOP[i].Toan); Write(‘ Diem van : ‘);readln(LOP[i].Van); end; Thao tác xử lí trong bản ghi:
4. Gán giá trị cho biến bản ghi A:=B; A.ht:=B.ht; A.dtb:=(A.toan A.li)/2; a. Các thao tác xử lí trong bản ghi * Ví dụ Tính tổng điểm văn và toán của từng học sinh trong lớp. For i:=1 to n do LOP[i].Tong:= LOP[i].Toan LOP[i].Van; * Ví dụ Điền chữ “Đạt” vào cột kết quả cho những học sinh có tổng >=10, ngược lại điền chữ “Khong dat”. For i:=1 to n do IF LOP[i].Tong>=10 then LOP[i].Ketqua=‘Dat’ else LOP[i].Ketqua=‘Khong dat’; In dữ liệu kiểu bản ghi:
4. Gán giá trị cho biến bản ghi c. In dữ liệu kiểu bản ghi Các bước Thể hiện bằng Pascal - Thông báo in Writeln(‘ Bang ket qua kiem tra chat luong ‘); - In bảng dữ liệu For i:=1 to n do Writeln(LOP[I].sbd:5,LOP[i].Hoten:30, LOP[i].Toan:5:1,LOP[i].Van:5:1, LOP[i].Tong:8:1,LOP[i].Ketqua:15); Củng cố
Bài 1:
* Bài 1 Trong ngôn ngữ lập trình Pascal, có thể gán giá trị cho bản ghi bằng cách? Trả lời
A. Gán giá trị cho từng trường
B. Gán giá trị cho bảng ghi;
C. Nhập giá trị từ bàn phím
D. Cả 3 cách trên
Bài 2:
* Bài 2 Để truy cập vào từng trường của bản ghi ta viết? Trả lời
A. .
B. .
C. .
D. .
Bài 3:
* Bài 3 Trong kiểu dữ liệu bản ghi, mỗi bản ghi thường được dùng để? Trả lời
A. Mô tả hay lưu trữ thông tin về nhiều đối tượng cần quản lý
B. Mô tả hay lưu trữ thông tin về một thuộc tính cần quản lý
C. Mô tả hay lưu trữ thông tin về một đối tượng cần quản lý
D. Mô tả hay lưu trữ thông tin về nhiều thuộc tính cần quản lý
Dặn dò và kết thúc
Dặn dò:
DẶN DÒ - Đọc kỹ lại bài đã học. - Về nhà làm bài tập từ 1 đến 8 trong sgk trang 79. - Chuẩn bị trước bài mới. Kết thúc: