ghi vào tệp SND.TXT các số là nguyên dương được đọc từ tệp SN.TXT Tùy theo điều kiện và đối tượng học sinh mỗi lớp yêu cầu các em hoàn thành và chuẩn bị bài 2b cho tiết học sau V.. ĐÁNH [r]
Trang 1Ngày soạn:27/1/2013
I.MỤC TIÊU
1 Kiến thức
- Khắc sâu thêm phần kiến thức về lí thuyết kiểu tệp, đặc biệt là các hàm và thủ tục liên quan
- Nắm được một số thuật toán cơ bản: các thao tác đọc và ghi dữ liệu
2 kĩ năng
- Khai báo biến kiểu tệp văn bản, gắn tên tệp, mở tệp để đọc, mở tệp để ghi, đọc, ghi tệp
3 Thái độ
- Góp phần rèn luyện tác phong, tư duy lập trình: Tự giác, tích cực, chủ động và sáng tạo trong tìm kiếm kiến thức
II ĐỒ DÙNG DẠY HỌC
1 Chuẩn bị của giáo viên.
- Phòng máy thực hành máy vi tính, máy chiếu Projector (nếu có), sách giáo khoa,
sách giáo viên
2 Chuẩn bị của học sinh.
- Sách giáo khoa
III PHƯƠNG PHÁP: Nêu vấn đề, vấn đáp, học sử dụng liệu trực quan.
IV.HOẠT ĐỘNG DẠY- HỌC
1 Ổn định lớp, kiểm tra sỉ số học sinh, phân nhóm thực hành
2 Kiểm tra bài cũ: Tiến hành toàn tiết học
3 Nội dung:
Hoạt động 1: Thực hiện chương trình giải bài tập
Hoạt động của giáo viên Hoạt động của học sinh
Giáo viên ra đề bài :
1 a Từ chương trình ví dụ 1 bài
16, hãy ghi khoảng cách của trại các
lớp tới trại của thầy hiệu trưởng vaò
tệp trai.out các số ghi trên một dòng,
với độ chính xác 2 chữ số thập phân
mỗi số cách nhau ít nhất 1 phím cách
(đã hướng dẫn tiết bài tập )
b hãy ghi ra màn hình khoảng cách
của các trại từ tệp trai.out ra màn hình
Yêu cầu học sinh soạn thảo chương
trình và thực hiện trên máy
Lưu ý : việc đọc DL từ tệp được lặp đi
lặp lại, nhưng không biết bao nhiêu
lần do đó phải sử dụng hàm EOF(<tên
1.Các nhóm trình bày a
var f,g;text;
d: real; x,y :integer;
begin assign(f,’trai.tx.t’); assign(g,’trai.out’); reset(f); rewrite(g);
while not(eof(f)) do begin
read(f,x,y); d:= sqrt(x*x+y*y);
write(g,d:5:2);
end;
close(f); close(g);
readln end
b
assign(f,’trai.out’);
Trang 2biến tệp>) để kiểm tra đã hết tệp
chưa?
Từ câu a, hãy bổ sung vào đoạn
chương trình hợp lý?
2.Lập trình để :
a đọc dữ liệu từ tệp SN.TXT gồm
các số nguyên và ghi ra màn hình
b ghi vào tệp SND.TXT các số là
nguyên dương được đọc từ tệp
SN.TXT
Tùy theo điều kiện và đối tượng học
sinh mỗi lớp yêu cầu các em hoàn
thành và chuẩn bị bài 2b cho tiết học
sau
reset(f);
while not(eof(f)) do begin
read(f,d);
writeln(‘khoang cach:’,d:0:2);
end;
close(f);
V ĐÁNH GIÁ CUỐI BÀI
1 Những nội dung đã học.
- Một số thao tác cơ bản liên quan đến Khai báo biến kiểu tệp văn bản, gắn tên tệp,
mở tệp để đọc, mở tệp để ghi, đọc, ghi tệp
2 Câu hỏi và bài tập về nhà.
Cho tệp SN.TXT gồm các số nguyên, hãy ghi vào tệp SND.TXT các số là nguyên dương được đọc từ tệp SN.TXT