Bài 13. Kiểu bản ghi

11
Ọ
Ọ
I
Trò chơi tìm người bí ẩn
Bác Hồ
Obama
Bill Gates
1890
1961
1955
Nghệ An
Hawaii
Washington
Dữ liệu kiểu bản ghi (record) dùng để mô tả các ……….. có cùng một số ………….. (trường) mà các ..……………..có thể có các ………………………..
Trường
(Field)
Bản ghi
(record)
đối tượng
thuộc tính
thuộc tính
kiểu dữ liệu khác nhau
§ 13
Kiểu bản ghi
1. Khai báo:
a. Cách khai báo kiểu:
type < tên kiểu bản ghi> = record
: ;
. . . . . . . . . . . . . . . . . . . . . .
< tên trường k> : ;
end;
type Nguoi = record
Stt: byte;
Ten:string[30];
NamSinh:integer;
NoiSinh:String;
end;
1. Khai báo
2. Gán giá trị
a. Khai báo kiểu:
b. Khai báo biến:
c. Tham chiếu:
a. Gán trực tiếp cho bản ghi:
a. Gán giá trị cho từng trường:
Bài tập
1. Khai báo:
b. Cách khai báo biến:
var
: ;
: ARRAY[1..n] of < tên kiểu bản ghi>;
Var DS:array[1..100] of Nguoi;
type Nguoi = record
Stt: byte;
Ten:string[30]; NamSinh:integer;
NoiSinh:String;
end;
1. Khai báo
2. Gán giá trị
a. Khai báo kiểu:
b. Khai báo biến:
c. Tham chiếu:
a. Gán trực tiếp cho bản ghi:
a. Gán giá trị cho từng trường:
Bài tập
A
B
C
1. Khai báo:
c. Cách tham chiếu đến từng trường của bản ghi:
.
B
B.NoiSinh
A
B
C
1. Khai báo
2. Gán giá trị
a. Khai báo kiểu:
b. Khai báo biến:
c. Tham chiếu:
a. Gán trực tiếp cho bản ghi:
a. Gán giá trị cho từng trường:
Bài tập
Ten
.
2. Gán giá trị:
B := A ;
Ví dụ :
a. Gán trực tiếp giá trị cho bản ghi:
(A, B là 2 biến bản ghi cùng kiểu)
b. Gán giá trị cho từng trường :
1. Khai báo
2. Gán giá trị
a. Khai báo kiểu:
b. Khai báo biến:
c. Tham chiếu:
a. Gán trực tiếp cho bản ghi:
a. Gán giá trị cho từng trường:
Bài tập
:= ;
2. Gán giá trị:
Ví dụ: A.Ten := ‘Nguyen Van Nam’ ;
a. Gán trực tiếp giá trị cho bản ghi:
b. Gán giá trị cho từng trường :
Dùng câu lệnh gán
1. Khai báo
2. Gán giá trị
a. Khai báo kiểu:
b. Khai báo biến:
c. Tham chiếu:
a. Gán trực tiếp cho bản ghi:
a. Gán giá trị cho từng trường:
Bài tập
.Tên trường := ;
Nhập từ bàn phím :
Readln( . );
Ví dụ:
Readln( A.Ten)
:= ;
BÀI TẬP
Có tối đa bao nhiêu
bản ghi
cần quản lý ?
Mỗi bản ghi
có các thuộc
tính nào?
Một lớp gồm N học sinh (N <=60) Quản lý học sinh với các thuộc tính trên. Biết rằng việc xếp loại được xác định như sau:
- Nếu tổng điểm toán và văn lớn hơn hoặc bằng 18 thì xếp loại A.
- Nếu tổng điểm toán và văn lớn hơn hoặc bằng 14 và nhỏ hơn 18 thì xếp loại B.
- Nếu tổng điểm toán và văn lớn hơn hoặc bằng 10 và nhỏ hơn 14 thì xếp loại C.
- Nếu tổng điểm toán và văn nhỏ hơn 10 thì xếp loại D.
1. Khai báo
2. Gán giá trị
a. Khai báo kiểu:
b. Khai báo biến:
c. Tham chiếu:
a. Gán trực tiếp cho bản ghi:
a. Gán giá trị cho từng trường:
Bài tập
DEMO
Program Xep_loai;
Uses crt;
Const Max = 60;
Var
Lop: array [1..Max] of HocSinh;
N, i: Byte;
Type HocSinh = Record
Hoten:string[30];
NgaySinh:string[10];
DiaChi:string[50];
Toan, Van:real;
XepLoai:char;
End;
1. Khai báo
2. Gán giá trị
a. Khai báo kiểu:
b. Khai báo biến:
c. Tham chiếu:
a. Gán trực tiếp cho bản ghi:
a. Gán giá trị cho từng trường:
Bài tập
BÀI TẬP
1. Khai báo
2. Gán giá trị
a. Khai báo kiểu:
b. Khai báo biến:
c. Tham chiếu:
a. Gán trực tiếp cho bản ghi:
a. Gán giá trị cho từng trường:
Bài tập
BÀI TẬP
Phần lý thuyết: Bài 1, 2, 3, 4 trang 79
Phần bài tập và thực hành: Bài 6, 7, 10 trang 79+80
1. Khai báo
2. Gán giá trị
a. Khai báo kiểu:
b. Khai báo biến:
c. Tham chiếu:
a. Gán trực tiếp cho bản ghi:
a. Gán giá trị cho từng trường:
Bài tập