Đọc dữ liệu từ tệp văn bản
Read (BienTep, b1, ..., bN); (1) Readln(BienTep, b1, ..., bN); (2) Readln(BienTep); (3) trong đó b1, ...,bN là các biến thuộc kiểu kí tự, nguyên, thực, logic, chuỗi.
Lệnh (1): đọc từ tệp ra các biến b1, ..., bN mà không chuyển cửa sổ tệp xuống dòng. Lệnh (2): đọc từ tệp ra các biến b1, ..., bN và chuyển cửa sổ tệp xuống dòng. Lệnh (3): chuyển cửa sổ tệp xuống dòng.
VD 9.11 Lập trình đọc tệp văn bản và in nội dung tệp đó ra màn hình.
Append(Var F: Text); mở tệp văn bản để ghi thêm vào cuối tệp với thủ tục Write(...) hay Writeln(...).
VD 9.12 Lập trình ghi thêm một số dòng vào cuối tệp TP70.TXT.
OUTPUT: tệp xuất cơ bản ( màn hình). Write(x, y, z); ~ Write(OUTPUT, x, y, z);
INPUT: tệp nhập cơ bản ( bàn phím). Readln(x, y, z); ~ Readln(INPUT, x, y, z);
LST: tệp máy in (trong Unit PRINTER.TPU khai báo Uses Printer; khi dùng).
VD 9.13 Lập trình tạo bảng mã ASCII và ghi vào tệp văn bản ASCII.TXT.
VD 9.14 Lập trình tạo bảng cửu chương và ghi vào tệp văn bản B9C.TXT. VD 9.15 Lập trình đọc dữ liệu từ tệp SN.DAT (đã có trên đĩa), ghi các số dương vào tệp văn bản SND.TXT.
VD 9.16 Lập trình giải phương trình bậc 2 ax2 + bx + c = 0 (a <> 0) Đọc dữ liệu từ tệp văn bản GPT2.INP gồm 1 dòng ghi 3 số thực a, b, c. Kết quả ghi vào tệp văn bản GPT2.OUT có cấu trúc như sau: Dòng đầu tiên ghi số nghiệm của phương trình. Các dòng tiếp theo, mỗi dòng ghi một giá trị nghiệm nếu có (lấy 2 chữ số thập phân).
Chia sẻ với bạn bè của bạn: |
