Thông tin

Tài nguyên dạy học

Các ý kiến mới nhất

  • test ok...
  • test hello world...

    • Hỗ trợ trực tuyến

    Điều tra ý kiến

    Bạn thấy trang này như thế nào?
    Bình thường
    Đẹp
    Đơn điệu
    Ý kiến khác

    Thống kê

  • truy cập   (chi tiết)
    trong hôm nay
  • lượt xem
    trong hôm nay
  • thành viên

    • Ảnh ngẫu nhiên

    Thành viên trực tuyến

    3 khách và 0 thành viên

    Chào mừng quý vị đến với website của ...

    Quý vị chưa đăng nhập hoặc chưa đăng ký làm thành viên, vì vậy chưa thể tải được các tài liệu của Thư viện về máy tính của mình.
    Nếu chưa đăng ký, hãy nhấn vào chữ ĐK thành viên ở phía bên trái, hoặc xem phim hướng dẫn tại đây
    Nếu đã đăng ký rồi, quý vị có thể đăng nhập ở ngay phía bên trái.

    Thao tac voi tep

    Wait
    • Begin_button
    • Prev_button
    • Play_button
    • Stop_button
    • Next_button
    • End_button
    • 0 / 0
    • Loading_status
    Tham khảo cùng nội dung: Bài giảng, Giáo án, E-learning, Bài mẫu, Sách giáo khoa, ...
    Nhấn vào đây để tải về
    Báo tài liệu có sai sót
    Nhắn tin cho tác giả
    (Tài liệu chưa được thẩm định)
    Nguồn:
    Người gửi: Phạm Văn Sĩ
    Ngày gửi: 10h:36' 05-06-2008
    Dung lượng: 292.5 KB
    Số lượt tải: 263
    Số lượt thích: 0 người
    Bài 15. Thao tác với tệp
    GV: Phạm Văn Sĩ
    Kiểm tra bài cũ
    Câu 1: Dữ liệu kiểu tệp được lưu trữ ở:
    Rom
    Ram
    Đĩa cứng
    Bộ nhớ ngoài
    Kiểm tra bài cũ
    Câu 2: Số lượng phần tử trong tệp
    a.Không được lớn hơn 128
    b.Không được lớn hơn 255
    c.Phải được khai báo trước
    d.Không bị giới hạn mà chỉ phụ thuộc vào dung lương ổ đĩa
    Bài 15. Thao tác với tệp
    1.Khai báo
    Var : Text;
    Vídụ: var f,g:Text;
    Biến tệp do người lập trình đặt
    Bài 15. Thao tác với tệp
    2.Thao tác với tệp
    a.Gắn tên tệp.Vấn đề đặt ra:
    Tên tệp
    Biến tệp
    Vd: `Dulieu.Dat`
    Biến
    Hằng
    Xâu
    Trong lập trình thao tác với biến tệp
    Thủ tục:
    Assign()
    Bài 15. Thao tác với tệp
    2.Thao tác với tệp
    a.Gắn tên tệp.
    Vd1:
    assign(f,`Dulieu.dat`);
    Trong đó:
    f:Là biến tệp
    `Dulieu.Dat`là hằng tệp
    Bài 15. Thao tác với tệp
    2.Thao tác với tệp
    a.Gắn tên tệp.
    Vd2: assign(f,`c:BaitapDulieu.dat`);
    Trong đó: f: là biến tệp
    `c:BaitapDulieu.dat` là hằng xâu chỉ đường dẫn tới tệp Dulieu.Dat

    Bài 15. Thao tác với tệp
    2.Thao tác với tệp
    a.Gắn tên tệp.
    Vd3: st:=`Dulieu.dat` ; assign(f,st);
    Trong đó: f:là biến xâu
    st: là biến xâu
    Bài 15. Thao tác với tệp
    2.Thao tác với tệp
    b.Mở tệp
    Đặt vấn đề: Có 1 quyển vở Tin 11.Khi tôi mở ra để làm thao tác gì?
    -Mở ra để đọc
    -Hoặc mở ra để ghi
    -Mở tệp để ghi:+ Gắn biến tệp với tên tệp cần ghi
    + Dùng thủ tục R ewrite()
    Vd: assign(f,`Dulieu.txt`);
    rewrite(f);
    Bài 15. Thao tác với tệp
    2.Thao tác với tệp
    b.Mở tệp
    -Mở tệp để đọc: + Gắn biến tệp với tên tệp
    + Dùng thủ tục Reset()
    Vd:
    Bài 15. Thao tác với tệp
    2.Thao tác với tệp
    c.Đọc/ghi tệp văn bản
    +Đọc tệp:
    Read(,);
    hoặc Readln(,);
    Vd: var f:text; a:integer;
    begin assign(f,`Dulieu.txt`);resset(f);
    read(f,a); .. End.

    Bài 15. Thao tác với tệp
    2.Thao tác với tệp
    c.Đọc/ghi tệp văn bản
    +Ghi tệp:
    write(,);
    hoặc writeln(,);
    Vd: var f:text; a:integer;
    begin assign(f,Dulieu.txt`);rewrite(f);
    a:=2; write(f,a); end.
    Bài 15. Thao tác với tệp
    (*) Một số hàm chuẩn
    Hàm Eof().
    Nếu = true khi ở cuối tệp
    Hàm Eoln().
    Nếu = true khi ở cuối dòng
    Bài 15. Thao tác với tệp
    2.Thao tác với tệp
    c.Đóng tệp
    Close();
    Vd: close(f); close(g);
    Bài 15. Thao tác với tệp
    Củng cố lại bài
    Var():text;
    Begin
    Assign(,);
    Reset(); Hoặc Rewrite();
    Read(); Hoặc Write();
    Close();
    End.
    Bài 15. Thao tác với tệp
    Bài tập về nhà:
    Dịch đoạn chương trình sau:
    Var f:text; a:integer;
    Begin
    assign(f,`Dulieu.txt`);reset(f);
    While not eof(f) do
    begin read(f,a);
    write(a:2);
    end;
    End.
    Xin chào! Xin cảm ơn!
     
    Gửi ý kiến