Bài 16. Ví dụ làm việc với tệp

VÍ DỤ LÀM VIỆC VỚI TỆP
Giáo viên: NGỌC CHÂU
VÍ DỤ GHI DỮ LIỆU VÀO TỆP
Bài toán 1: Cho bài thơ sau:
Cảnh khuya
Tiếng suối trong như tiếng hát xa
Trăng lồng cổ thụ, bóng lồng hoa
Cảnh khuya như vẻ người chưa ngủ
Chưa ngủ vì lo nỗi nước nhà
Viết chương trình ghi bài thơ trên vào tệp THO.TXT.
VÍ DỤ GHI DỮ LIỆU VÀO TỆP
Các bước thực hiện bài toán ?
Bước 1 : Gắn tệp
Bước 2 : Mở tệp để ghi
Bước 3 : Ghi nội dung vào tệp
Bước 4 : Đóng tệp

VÍ DỤ GHI DỮ LIỆU VÀO TỆP
Các thủ tục được sử dụng với kiểu dữ liệu tệp được dùng trong bài toán ?
Assign(,;
Rewrite();
Write(,);
Writeln(,);
close();
VÍ DỤ GHI DỮ LIỆU VÀO TỆP
Tệp THO.TXT
Chạy chương trình
Tệp THO.TXT
VÍ DỤ ĐỌC DỮ LIỆU TỪ TỆP
Bài toán (VD1/SGK.Trang 87): Một trường THPT tổ chức cắm trại. Để lên lịch thăm khu trại các lớp, thầy hiệu trưởng cần biết khoảng cách từ trại của mình (có vị trí tọa độ (0, 0)) đến trại các giáo viên chủ nhiệm. Vị trí trại mỗi giáo viên chủ nhiệm có tọa độ nguyên (x, y) được ghi trong tệp văn bản TRAI.TXT. Viết chương trình đọc các cặp tọa độ từ tệp TRAI.TXT, tính và đưa ra màn hình khoảng cach giữa mỗi trại của GVCN và trại của thầy hiệu trưởng.
A (xa, ya)
Trại hiệu trưởng (0,0)
B (xb, yb)
C (xC, yC)
VÍ DỤ ĐỌC DỮ LIỆU TỪ TỆP
 
VÍ DỤ ĐỌC DỮ LIỆU TỪ TỆP
Các thủ tục được sử dụng với kiểu dữ liệu tệp được dùng trong bài toán ?
Assign(,;
Reset();
read(,);
close();
VÍ DỤ ĐỌC DỮ LIỆU TỪ TỆP
Tệp TRAI.TXT
CHƯƠNG TRÌNH VD1GK
Chạy chương trình
VÍ DỤ ĐỌC & GHI DỮ LIỆU TỆP
Bài toán 3: Cho tệp BT.TXT chứa 3 số nguyên liên tiếp trên 1 dòng. Viết chương trình đọc dữ liệu từ tệp BT.TXT, tính tổng các số trên cùng 1 dòng; ghi tổng của các dòng vào tệp KQ.txt
VÍ DỤ GHI DỮ LIỆU VÀO TỆP
Các bước thực hiện bài toán ?
1. Gắn tệp BT.TXT, KQ.TXT vào các biến tệp
2. Mở tệp BT.TXT để đọc và mở tệp KQ.TXT để ghi
3. Nếu chưa cuối tệp BT.TXT thì thực hiện
3.1. Đọc dữ liệu từ tệp gắn vào biến x, y, z
3.2. t x+y+z
3.3. Ghi t vào tệp KQ.TXT trên 1 dòng
4. Đóng các tệp
VÍ DỤ ĐỌC & GHI DỮ LIỆU TỆP
Các thủ tục được sử dụng với kiểu dữ liệu tệp được dùng trong bài toán ?
Assign(,;
Reset(); Rewrite();
read(,);
Writeln(,);
close();
Tệp BT.TXT
CHƯƠNG TRÌNH BAITAP3.PAS
Chạy chương trình
Tệp KQ.TXT

VÍ DỤ ĐỌC & GHI DỮ LIỆU TỆP
HƯỚNG DẪN VÍ DỤ 2 SGK
Nếu chưa cuối tệp RESIST.DAT thực hiện:
Đọc dữ liệu từ tệp gắn vào biến R1, R2, R3.
a1R1*R2*R3/(R1*R2+R2*R3+R3*R1)
a2R1*R2/(R1+R2)+R3
a3R1*R3/(R1+R3)+R2
a4R3*R2/(R3+R2)+R1
a5 R1+R2+R3
Ghi dữ liệu điện trở vào tệp RESIST.EQU
Tệp RESIST.DAT
CHƯƠNG TRÌNH BT4.PAS
Chạy chương trình
Tệp RESIST.EQU
VÍ DỤ ĐỌC & GHI DỮ LIỆU TỆP
Bài tập trong SGK trang 89
Bài 4, 5, 6, 7 trong đề
Bài tập về nhà
Thank you!
Thank you!