Bài giảng Điện tử Tin học lớp 11: Bài 17

Chia sẻ: Le Ba Thanh | Ngày: | Loại File: PPT | Số trang:13

Thêm vào BST

Báo xấu

107
lượt xem 7
download

Download Vui lòng tải xuống để xem tài liệu đầy đủ

Bài giảng Điện tử Tin học lớp 11 - Bài 17: Kiểu dữ liệu tệp và khai báo với tệp, giới thiệu vai trò kiểu tiệp, khai báo tệp văn bản, thao tác với tệp. Chúc các em học tốt.

Chủ đề:

Bình luận(0) Đăng nhập để gửi bình luận!

Lưu

Nội dung Text: Bài giảng Điện tử Tin học lớp 11: Bài 17

Bµi 17 Gi¸o ¸n ®iÖn tö tin häc líp 11
1. Vai trß kiÓu tÖp D÷ liÖu kiÓu tÖp ®îc lu tr÷ l©u dµi ë bé nhí ngoµi (®Üa tõ, CD, ...) vµ kh«ng bÞ mÊt khi t¾t nguån ®iÖn. Lîng th«ng tin lu tr÷ trªn tÖp cã thÓ rÊt lín vµ chØ phô thuéc vµo dung lîng ®Üa.
Cã hai lo¹i tÖp thêng dïng: TÖp ®Þnh kiÓu TÖp v¨n b¶n Lµ tÖp mµ c¸c phÇn tö cã Gåm c¸c kÝ tù ®îc ph©n cïng mét kiÓu. Sè lîng phÇn chia thµnh mét hoÆc nhiÒu tö kh«ng x¸c ®Þnh tríc. dßng. Díi ®©y ta c hØ xÐt c ¸c khai b ¸o v µ lµm v iÖc v íi tÖp v ¨n b ¶n.
2. Khai b¸o tÖp v¨n b¶n Var : Program vd1; TEXT; Uses crt; Var VÝ dô : tep1,tep2: TEXT; te p 1,te p 2 : Te xt;
3. Thao t¸c víi tÖp G¸n tªn tÖp Më tÖp ®Ó g hi Më tÖp ®Ó ®äc Ghi d÷ liÖu ra tÖp §äc d÷ liÖu tõ tÖp §ãng tÖp
a. G¸n tªn tÖp ASSIGN(,); Tª n tÖp : Lµ b iÕn x©u ho Æc h»ng x©u. VÝ dô : ASSIGN(tep1, ‘DULIEU.DAT’); BiÕn te p 1 ®îc g ¾n víi tÖp c ã tªn DULIEU.DAT ASSIGN(tep2, ‘D:\TP\BAITAP.INP’); BiÕn te p 2 ®îc g ¾n víi tÖp c ã tªn BAITAP.INP tro ng th mô c TP ë æ ®Üa D.
b. Më tÖp Thñ tôc më tÖp ®Ó ghi kÕt qu¶: Program vd1; REWRITE (); Uses crt; Var tep1,tep2: TEXT; BEGIN Clrscr; NÕu nh trª n æ D:\TP c ha ASSIGN(tep2, ‘D:\TP\BAITAP.INP’); c ã tÖp BAITAP.INP, th× tÖp s Ï ®îc t¹o rç ng . NÕu ®· c ã, REWRITE (te p 2); th× né i d ung c ò b Þ xo ¸ ®Ó c huÈn b Þ g hi d ÷ liÖu m íi.
c . Ghi d÷ liÖu ra tÖp Thñ tô c g hi d÷ liÖu ra tÖp Program vd1; Uses crt; Var WRITE(, ); tep2: TEXT; a,b: integer; BEGIN WR ITELN (, ); ASSIGN(tep2, ‘D:\TP\BAITAP.INP’); REWRITE (te p 2);  Danh s ¸c h kÕt q u¶ g åm m é t a:=3; b:=5; hay nhiÒu p hÇn tö . PhÇn tö c ã WRITE (tep2,a,’ ‘,b); thÓ lµ b iÕn, h»ng x©u ho Æc Close(tep2); b iÓu thø c . Readln; END.
Gi¸ trÞ hai biÕn a=3, b=5 ®îc g hi ë tro ng tÖp BAITAP.INP.
d. §äc d÷ liÖu tõ tÖp Thñ tô c më tÖp ®Ó ®äc d÷ Program vd2; liÖu Uses crt; Var R ES ET (); tep2: TEXT; x1,y1: integer; Thñ tô c ®äc d÷ liÖu tõ tÖp: BEGIN Clrscr; ASSIGN(tep2, ‘D:\TP\BAITAP.INP’); READ(, ); RES ET (te p 2); R EADLN (, ); WRITE (‘Hai s o d o la’ ,x1,y 1);  Danh s ¸c h b iÕn lµ m é t ho Æc Close(tep2); nhiÒu b iÕn ®¬n. Readln; END.
e . Thñ tô c ®ãng tÖp CLOS E(< tªn biÕn tÖp>) Ghi d÷liÖu ra tÖp §äc d÷liÖu tõ tÖp Program vd1; Program vd2; Uses crt; Uses crt; Var Var tep2: TEXT; tep2: TEXT; a,b: integer; x1,y1: integer; BEGIN BEGIN Clrscr; Clrscr; ASSIGN(tep2, ‘D:\TP\BAITAP.INP’); ASSIGN(tep2, ‘D:\TP\BAITAP.INP’); REWRITE (tep2); RES ET (te p 2); a:=3; b:=5; READLN(te p 2, x1,y 1); WRITE (tep2,a,b); WRITE (‘Hai s o d o la’ ,x1,y 1); Close(tep2); Close(tep2); Readln; Readln; END. END.
f. Mé t s è hµm c huÈn thê ng dïng tro ng xö lÝ tÖp v¨n b¶n EOF(); Cho gi¸ trÞ ®óng nÕu con trá ®ang chØ tíi cuèi tÖp. EOFLN(); Cho gi¸ trÞ ®óng nÕu con trá ®ang chØ tíi cuèi dßng.
H·y nhí!  Khai b¸o tÖp v¨n b¶n: Var < Tªn biÕn tÖp>: Te xt;  G¸n tªn tÖp: AS S IGN();  Më tÖp: §Ó ®äc : RES ET(); §Ó g hi: REWRITE(< Tªn biÕn tÖp>);  §äc /g hi tÖp §äc : READ(, biÕn nhËn); Ghi: REWRITE(< Tªn biÕn tÖp>,biÕn ®a ra);  §ãng tÖp CLOS E(< tªn biÕn tÖp>);