Tải bản đầy đủ (.ppt) (18 trang)

Bai 1415 tep va thao tac voi tep

Bạn đang xem bản rút gọn của tài liệu. Xem và tải ngay bản đầy đủ của tài liệu tại đây (755.24 KB, 18 trang )

<span class='text_page_counter'>(1)</span><div class='page_container' data-page=1></div>
<span class='text_page_counter'>(2)</span><div class='page_container' data-page=2></div>
<span class='text_page_counter'>(3)</span><div class='page_container' data-page=3>

1. Vai trß kiĨu tƯp



<b>D liệu kiểu tệp đ ợc l u tr lâu dài ở </b>

<b>ữ</b>

<b>ữ</b>


<b>bộ nhớ ngoài (đĩa từ, CD, ...) và </b>


<b>không bị mất khi tắt nguồn điện. </b>



</div>
<span class='text_page_counter'>(4)</span><div class='page_container' data-page=4>

Cã hai lo¹i tƯp th êng dïng:



Tệp c

ú

cấu trúc

Tệp văn bản



<b>L tp mà thành phần của nó </b>
<b>được tổ chức theo một cấu trúc </b>
<b>nhất định.</b>


<b>VD: Tệp hình ảnh, âm thanh, …..</b>


<b>Là tệp mà dữ liệu được ghi dưới </b>
<b>dạng các ký tự. trong tệp văn bản </b>
<b>dãy ký tự được kết thúc bởi ký tự </b>
<b>xuống dòng hay ký tự kết thúc </b>
<b>tệp tạo thành một dòng. </b>


<b>VD: các tệp văn bản, sách báo…</b>


</div>
<span class='text_page_counter'>(5)</span><div class='page_container' data-page=5>

Trong chương trình Pascal
khi chúng ta muốn dùng
một biến để chứa dữ liệu,
thì việc đầu tiên chúng ta sẽ


<b>làm là gì,</b>



để có thể sử dụng được biến
đó???


Trong chương trình Pascal
khi chúng ta muốn dùng
một biến để chứa dữ liệu,
thì việc đầu tiên chúng ta sẽ


<b>làm là gì,</b>


để có thể sử dụng được biến
đó???


Khai bỏo


bin



</div>
<span class='text_page_counter'>(6)</span><div class='page_container' data-page=6>

3. Khai báo tệp văn bản



<b>C</b>

<b>u trỳc chung:</b>


<b>Var <Tên biến tệp> : TEXT;</b>



<b>Ví dô:</b>

<b> </b>



<b>tep1,tep2 : Text;</b>



<b>Program vd1;</b>


<b>Uses crt;</b>



<b>Var</b>


<b> tep1,tep2: TEXT;</b>


</div>
<span class='text_page_counter'>(7)</span><div class='page_container' data-page=7>

var tep1, tep2 : text;



var tep1, tep2 : text;


var tep vb : text;



var tep vb : text;

var tep1,tep2 : text.

var tep1,tep2 : text.



Em hãy chọn đáp án đúng?



Em hãy chọn đáp án đúng?



</div>
<span class='text_page_counter'>(8)</span><div class='page_container' data-page=8>

4. Thao tác với tệp



<b>Gán tên tệp</b>


<b>M tp ghi</b> <b><sub>M tp c</sub></b>


<b>Ghi dữ liệu vào tệp</b> <b>Đọc dữ liệu từ tệp</b>


</div>
<span class='text_page_counter'>(9)</span><div class='page_container' data-page=9>

<b>a. Gán tên tệp</b>



ASSIGN(<biến tệp>,<tên tệp>);


<b>Tên tệp: Là biến xâu hoặc hằng xâu.</b>


<b>ASSIGN(</b><i><b>tep1</b></i><b>, DULIEU.DAT);</b>



<b>ASSIGN(</b><i><b>tep2</b></i><b>, D:\TP\BAITAP.INP);</b>


<b>Ví dụ:</b>



<b> Biến tep1 đ ợc gắn với tệp cã </b>
<b>tªn DULIEU.DAT</b>


</div>
<span class='text_page_counter'>(10)</span><div class='page_container' data-page=10>

<b>b. Mở tệp</b>

<b>để ghi và ghi tệp</b>



REWRITE (<biÕn tÖp>);


<b>Thủ tục mở tệp để ghi kết quả:</b>



<b>Nếu nh trên ổ D:\TP ch a có tệp </b>
<b>BAITAP.INP, thì tệp sẽ đ ợc tạo </b>
<b>rỗng. Nếu đã có, thì nội dung cũ </b>
<b>bị xoá để chuẩn bị ghi dữ liệu </b>
<b>mới.</b>


<b>Thđ tơc ghi d liƯu vµo tệp</b>


<i><b></b></i><b> Danh sách kết quả gåm mét hay </b>
<b>nhiỊu phÇn tư. Phần tử có thể là </b>
<b>biến, hằng xâu hoặc biểu thức.</b>


WRITE(<biến tệp>, <Danh sách kết quả>);


WRITELN (<biến tệp>, <Danh sách kết quả>);



<b>Program vd1;</b>
<b>Uses crt;</b>
<b>Var</b>
<b> tep2: TEXT;</b>
<b> a,b: integer;</b>
<b>ASSIGN(tep2, ‘D:\TP\BAITAP.INP’);</b>
<b>REWRITE (tep2);</b>


<b>WRITE (</b><i><b>tep2,a, ,b)</b></i><b>;</b>


</div>
<span class='text_page_counter'>(11)</span><div class='page_container' data-page=11>

<b>Giá trị hai biến </b>


<b>a=3, b=5 đ ợc </b>


<b>ghi ở trong tÖp </b>


<b>BAITAP.INP.</b>



</div>
<span class='text_page_counter'>(12)</span><div class='page_container' data-page=12>

RESET (<biÕn tÖp>);


<b>Thủ tục mở tệp để đọc d liệuữ</b>


<b> <sub>Thủ tục đọc d</sub>ữ</b> <b><sub>liệu từ tệp:</sub></b>


<i><b>ưDanhưsáchưbiếnưlàưmộtưhoặcư</b></i>
<i><b>nhiềuưbiếnưđơn.</b></i>


<b>c. Mở tệp để đọc và ọc d liệu từ tệp</b>

<b>đ</b>

<b>ữ</b>



<b>Program vd2;</b>
<b>Uses crt;</b>


<b>Var</b>



<b> tep2: TEXT; </b>
<b> x1,y1: integer;</b>


<b>ASSIGN(</b><i><b>tep2</b></i><b>, ‘D:\TP\BAITAP.INP’);</b>


<b>RESET (tep2);</b>


<b>READLN (</b><i><b>tep2,x1,y1)</b></i><b>;</b>


<b> BEGIN</b>


<b> Clrscr;</b>


<b>Close(</b><i><b>tep2)</b></i><b>;</b>
<b>Readln;</b>


<b>END.</b>


<b>WRITE (</b><i><b>‘</b></i><b>Hai so do la ,x1,y1)</b><i><b>’</b></i> <b>;</b>


READ(<biÕn tƯp>, <Danh s¸ch biÕn>);


</div>
<span class='text_page_counter'>(13)</span><div class='page_container' data-page=13>

Tại sao phải


đóng tệp?



Tại sao phải


đóng tệp?



Sau khi làm việc xong với tệp


cần phải đóng tệp.


Chỉ có đóng tệp thì khi đó hệ thống
mới thực sự hồn tất q trình đọc và ghi


</div>
<span class='text_page_counter'>(14)</span><div class='page_container' data-page=14>

<b>Close(</b><i><b>tep2)</b></i><b>;</b>
<b>Program vd1;</b>
<b>Uses crt;</b>
<b>Var</b>
<b> tep2: TEXT;</b>
<b> a,b: integer;</b>
<b>BEGIN</b>
<b> Clrscr;</b>
<b>ASSIGN(tep2, ‘D:\TP\BAITAP.INP’);</b>


<b>REWRITE (</b><i><b>tep2)</b></i><b>;</b>
<b>WRITE (</b><i><b>tep2,a,b)</b></i><b>;</b>
<b>a:=3; b:=5;</b>


<b>Readln;</b>


<b>END.</b>


<b>Close(</b><i><b>tep2)</b></i><b>;</b>


<b>BEGIN </b>


<b> Clrscr; </b>


<b>ASSIGN(tep2, ‘D:\TP\BAITAP.INP’);</b>



<b>READLN(tep2, x1,y1);</b>


<b>WRITE (</b><i><b>‘</b></i><b>Hai so do la ,x1,y1)</b><i><b>’</b></i> <b>;</b>


<b>Readln;</b>
<b>END.</b>
<b>Program vd2;</b>
<b>Uses crt;</b>
<b>Var</b>
<b> tep2: TEXT;</b>
<b> x1,y1: integer;</b>


<b>RESET (tep2);</b>


<b>d. Thủ tục đóng tệp</b>

CLOSE(< tên biến tệp>)


</div>
<span class='text_page_counter'>(15)</span><div class='page_container' data-page=15>

<b>e. Mét sè hµm chuÈn th êng dïng trong xư lÝ tƯp v n b¶n</b>

<b>ă</b>

<b> </b>



<b>EOF</b><i><b>(<biÕn tÖp>);</b></i>


<b> Cho giá trị đúng nếu con trỏ đang chỉ tới cuối tệp.</b>
<b>EOFLN</b><i><b>(<biến tệp>);</b></i>


</div>
<span class='text_page_counter'>(16)</span><div class='page_container' data-page=16>

Câu lệnh dùng mở tệp để đọc?



Câu lệnh dùng mở tệp để đọc?



<b>a. open(<biến tệp>,<tên tệp>);</b>


<b>b. reset (<biến tệp>,<tên tệp>);</b>



<b>c. open(<biến tệp>);</b>



<b>d. reset(biến tệp);</b>



<b>a. open(<biến tệp>,<tên tệp>);</b>


<b>b. reset (<biến tệp>,<tên tệp>);</b>


<b>c. open(<biến tệp>);</b>



</div>
<span class='text_page_counter'>(17)</span><div class='page_container' data-page=17>

Nối cấu trúc thích hợp



Nối cấu trúc thích hợp



<b>1. Đóng tệp.</b>


<b>2. Mở tệp.</b>



<b>3. Gán tên tệp.</b>



<b>4. Đọc/ghi tệp văn bản.</b>


<b>1. Đóng tệp.</b>



<b>2. Mở tệp.</b>



<b>3. Gán tên tệp.</b>



<b>4. Đọc/ghi tệp văn bản.</b>



<b>a. assign(<biến tệp>,<tên tệp>);</b>


<b>b. reset(<biến tệp>);</b>



<b>c. read(<biến tệp>,<danh sách biến>);</b>




<b>d. write(<biến tệp>,<danh sách kết quả>);</b>


<b>e. close(<biến tệp>);</b>



<b>a. assign(<biến tệp>,<tên tệp>);</b>


<b>b. reset(<biến tệp>);</b>



<b>c. read(<biến tệp>,<danh sách biến>);</b>



<b>d. write(<biến tệp>,<danh sách kết quả>);</b>


<b>e. close(<biến tệp>);</b>



<b>1 – e</b>


<b>2 – b</b>


<b>3 – a</b>


<b>4 – c, d</b>



</div>
<span class='text_page_counter'>(18)</span><div class='page_container' data-page=18>

<b>CHÚC </b>


<b>CÁC </b>



<b>EM </b>


<b>HỌC </b>


<b>TỐT</b>


<b>CHÚC </b>



<b>CÁC </b>


<b>THẦY</b>



</div>

<!--links-->

Tài liệu bạn tìm kiếm đã sẵn sàng tải về

Tải bản đầy đủ ngay
×