III. Tiền trình tiết dạy:
Bài dạy: ÔN TẬP CHƯƠNG IV (tiết 2) I Mục tiêu:
I. Mục tiêu:
1. Kiến thức
- Ôn tập lại kiến thức của chương cho học sinh
2. Kĩ năng
- Rèn luyện kỹ năng viết chương trình. 3. Thái độ
- Xây dựng lòng ham thích lập trình nhằm giải quyết các bài toán bằng máy tính.
II. Đồ dùng dạy học
SGK + Giáo án + phòng máy.
III. Tiến trình tiết dạy:
1. Ổn định lớp.2. Bài mới: 2. Bài mới:
Gv: nêu bài toán Hs: ghi bài
Gv: Hãy cho biết yêu cầu của bài toán. Hs: trả lời câu hỏi.
Gv: nêu bài toán 2
Gv: Cho biết yêu cầu bài toán? Hs: trả lời câu hỏi.
Gv: gọi 1 hs lên định nghĩa kiểu bản ghi, khai báo biến kiểu bản ghi
Hs lên bảng
Gv: cho biết cách truy xuất đến trường của biến bản ghi.
Hs: <tên biến bản ghi>.<tên trường>
Baì toán1: Viết chương trình nhập từ bàn phím xâu kí tự S có độ dài không quá 100. Cho biết có bao nhiêu chữ số xuất hiện trong xâu. Đưa kết quả ra màn hình.
Program Baitoan1; Var S: string[100];
i, dem: byte;
BEGIN
write(‘ nhap xau ki tu dai khong qua 100’); readln(S);
dem:=0;
for i:=1 to length(S) do
if (‘0’ <= S[i]) and (S[i] <= ‘9’) then dem:=dem + 1; writeln(‘trong xau S co’, dem, ‘chu so’);
readln;
end.
Bài toán 2: Một lớp học chứng chỉ tin nghề gồm N học viên (N<=50). Cần quản lí học viên gồm các thuộc tính như: Họ tên, địa chỉ, điểm lý thuyết, điểm thực hành, xếp loại. Biết rằng việc xếp loại được xác định như sau:
- Nếu tổng điểm lý thuyết và thực hành >17 thì xếp loại A. - Nếu tổng điểm lý thuyết và thực hành lớn hơn hoặc bằng 14 và nhỏ hơn hoặc bằng 17 thì xếp loại B.
- Nếu tổng điểm lý thuyết và thực hành nhỏ hơn 14 thì xếp loại C.
Viết chương trình nhập vào các thông tin và xếp loaiï từng học viên. In ra màn hình Ds học viên xếp loại A.
Program bt2; Uses Crt;
Type Hocvien= Record