Giáo án Tin học 11 tiết 41: Bài tập

Thời gian: 1 tiết	 Ngày dạy: 12/02/2012 
Tiết chương trình: 41	Lớp dạy: 112
BÀI TẬP
Mục tiêu:
Kiến thức:
Hiểu và hình thành kỹ năng về các thao tác cơ bản khi làm việc với tệp như: 
Mở tệp.
Gắn tên tệp cho biến tệp.
Đọc/ghi dữ liệu đối với tệp.
Đóng tệp.
Kỹ năng:
Đọc/ghi dữ liệu đối với tệp văn bản.	
Chuẩn bị:
Giáo viên: Giáo án, SBT.
Học sinh:
SGK, SBT, tập ghi chép.
Phương pháp dạy học:
Sử dụng phương pháp thuyết trình, vấn đáp.
Tiến trình:
Ổn định tổ chức: 
Kiểm tra sỉ số lớp.
Ổn định lớp để bắt đầu tiết học.
Kiểm tra bài cũ: (Gọi 2 HS lên bảng viết lại chương trình ở §16)
GV nhận xét phần trả lời của HS và ghi điểm.
Giảng bài mới: 
Hoạt động của thầy và trò
Nội dung bài dạy
Hoạt động 1: Ví dụ 1
Hoạt động 1.1: Tìm hiểu đầu bài.
GV: Viết đề bài Ví dụ 1 lên bảng.
HS: Phân tích bài toán, xác định yêu cầu của bài toán theo sự hướng dẫn của giáo viên.
GV: Để học sinh tự tư duy viết theo ý tưởng của các em.
HS: Suy nghĩ và viết chương trình theo ý nghĩ của mình.
GV: Yêu cầu học sinh khác nhận xét và có chỉnh sửa.
HS: Quan sát và nhận xét chương trình.
GV: Lưu ý HS là ta có thể gắn tên tệp và mở tệp để đọc sau khi nhập xâu.
Hoạt động 2: Ví dụ 2
Hoạt động 2.1: Tìm hiểu đầu bài.
GV: Viết đề bài Ví dụ 1 lên bảng.
HS: Phân tích bài toán, xác định yêu cầu của bài toán theo sự hướng dẫn của giáo viên.
GV: Để học sinh tự tư duy viết theo ý tưởng của các em.
GV: Yêu cầu học sinh khác nhận xét và có chỉnh sửa.
HS: Quan sát và nhận xét chương trình.
GV: Khái quát lại cả chương trình. Lưu ý HS ta không thể đọc dữ liệu nếu chưa gắn tên tệp và mở tệp.
Tiết 38:
BÀI TẬP
Ví dụ 1: Viết chương trình nhập vào 1 xâu kí tự và tiến hành ghi ra tệp văn bản có tên là BT1.TXT (được lưu ở ổ đĩa gốc D).
program mo_ghi;
var f: text;
x: string;
begin
assign(f,'C:\VD1.TXT');
rewrite(f); 
Write(' Nhap vao 1 xâu ki tu :');
readln(x);
write(f, x);
close(f);
end.
Ví dụ 2: Viết chương trình mở một tệp văn bản BT2.TXT được lưu ở ổ đĩa gốc D và đọc dữ liệu trong tệp ra màn hình.
program mo_doc;
var f: text;
s: string[10];
x: longint;
begin
assign(f,'D:\VD2.TXT');
reset(f);
read(f, s, x);
writeln(s);
writeln(x);
close(f);
end.
Củng cố và luyện tập: 
Giáo viên nhắc lại các thao tác khi làm việc với tệp cùng với các thủ tục của nó.
Chuẩn bị trước bài 17.
Tuần sau học tại CS1.
V. Rút kinh nghiệm:
------------------------------------------------------------------------------------------------------------------
------------------------------------------------------------------------------------------------------------------
------------------------------------------------------------------------------------------------------------------
------------------------------------------------------------------------------------------------------------------
------------------------------------------------------------------------------------------------------------------