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

Tiết 33 - Bài tập Kiểu Bản Ghi
Tin học 11
GV: Nguyễn Thanh Hương
Tổ: Lý - Tin - CN
Gv: Nguyễn Thanh Hương
Kiểm tra bài cũ
1- Viết lệnh khai báo các biến cho bài toán trên
Bài toán: Quản lý thành tích chạy 100m chào mừng 26/3,
2- Viết lệnh nhập thông tin phiếu kiểm tra sức khỏe học sinh thứ I trong lớp
Type HocSinh=Record
HoTen:string[30];
GioiTinh:string[3];
Cao, Nang:real;
End;
Var ds:array[1..50] of HocSinh;
Write(`nhap thong tin cua hs thu `,i);
Write (`nhap Ho ten:`);readln(ds[i].HoTen);
Write (`nhap Gioi Tinh:`);readln(ds[i].GioiTinh);
Write (`nhap chieu cao:`);readln(ds[i].Cao);
Write (`nhap can nang:`);readln(ds[i].Nang);
Gv: Nguyễn Thanh Hương
Gv: Nguyễn Thanh Hương