Bài giảng Điện tử Tin học lớp 11 - Bài 16: Kiểu bản ghi, giới thiệu với các em về dữ liệu kiểu bản ghi, khai báo dữ liệu kiểu bản ghi. Chúc các em học tốt. | Bµi 16 kiÓu b¶n ghi Gi¸o ¸n ®iÖn tö tin häc líp 11 . . . . Tæng Phan V©n 50 §Æng Anh TuÊn 49 TrÇn Thu Trµ 48 Vò Ngäc B×nh 02 NguyÔn An 01 KÕt qu¶ V¨n To¸n Hä tªn SBD Bµi to¸n ®Æt vÊn ®Ò: B¶ng kÕt qu¶ kiÓm tra chÊt lîng B¶n ghi (Record) Trêng (Field) B¶ng gåm : 50 ®èi tîng (record) víi 6 thuéc tÝnh (Field) Yªu cÇu: NhËp vµo th«ng tin cña tõng häc sinh, tÝnh tæng vµ xÐt kÕt qu¶, biÕt r»ng nÕu tæng >=10 th× kÕt qu¶ lµ “§¹t” 1. D÷ liÖu kiÓ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. 2. Khai b¸o kiÓu b¶n ghi Type = record : kiÓu trêng 1; : kiÓu trêng 2; end; Var : ; : ARRAY[1Max] of ; D÷ liÖu kiÓu b¶n ghi . . . . Tæng Phan V©n 50 §Æng Anh TuÊn 49 TrÇn Thu Trµ 48 Vò Ngäc B×nh 02 NguyÔn An 01 KÕt qu¶ V¨n To¸n Hä tªn SBD Type Hocsinh = record SBD: integer; Hoten: string[30]; Toan,Van,Tong: real; Ketqua: string[10]; end; Var LOP: ARRAY[150] of Hocsinh; I,j,n : integer; Khai b¸o kiÓu d÷ liÖu cho c¸c trêng (field) Khai b¸o biÕn kiÓu b¶n ghi (record) 3. C¸c thao t¸c víi b¶n ghi a. NhËp th«ng tin häc sinh Write(‘ Nhap vao so hoc sinh trong lop : ‘); readln(n); C¸c bíc: ThÓ hiÖn b»ng pascal - NhËp sè häc sinh 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; - NhËp d÷ liÖu (c¸c thuéc tÝnh) cña tõng b¶n ghi NguyÔn An 01 V¨n To¸n Hä vµ tªn SBD Khi i = 1 LOP[1].SBD Qu¸ tr×nh nhËp kÕt thóc khi nhËp hÕt d÷ liÖu cho b¶n ghi thø n. * NhËp gi¸ trÞ trêng cho SBD cña häc sinh thø nhÊt n»m ë b¶n ghi ®Çu tiªn. * T¬ng tù nh vËy nhËp gi¸ trÞ c¸c trêng cßn l¹i. b. C¸c thao t¸c xö lÝ trong b¶n ghi . | Bµi 16 kiÓu b¶n ghi Gi¸o ¸n ®iÖn tö tin häc líp 11 . . . . Tæng Phan V©n 50 §Æng Anh TuÊn 49 TrÇn Thu Trµ 48 Vò Ngäc B×nh 02 NguyÔn An 01 KÕt qu¶ V¨n To¸n Hä tªn SBD Bµi to¸n ®Æt vÊn ®Ò: B¶ng kÕt qu¶ kiÓm tra chÊt lîng B¶n ghi (Record) Trêng (Field) B¶ng gåm : 50 ®èi tîng (record) víi 6 thuéc tÝnh (Field) Yªu cÇu: NhËp vµo th«ng tin cña tõng häc sinh, tÝnh tæng vµ xÐt kÕt qu¶, biÕt r»ng nÕu tæng >=10 th× kÕt qu¶ lµ “§¹t” 1. D÷ liÖu kiÓ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. 2. Khai b¸o kiÓu b¶n ghi Type = record : kiÓu trêng 1; : kiÓu trêng 2; end; Var : ; : ARRAY[1Max] of ; D÷ liÖu kiÓu b¶n ghi . . . . Tæng Phan V©n 50 §Æng Anh TuÊn 49 TrÇn Thu Trµ 48 Vò Ngäc B×nh 02 NguyÔn An 01 KÕt qu¶
