Tài liệu hạn chế xem trước, để xem đầy đủ mời bạn chọn Tải xuống
1
/ 19 trang
THÔNG TIN TÀI LIỆU
Thông tin cơ bản
Định dạng
Số trang
19
Dung lượng
3,88 MB
Nội dung
Cho cc em lp 11b1! -Dữ liệu lưu trong bộ nhớ trong sẽ mất đi khi tắt máy hoặc kết thúc chương trình. -Dữ liệu lưu trong bộ nhớ ngoài có thể tồn tại ngay khi tắt máy (không còn nguồn điện). ! " Em hãy nêu sự khác biệt giửa bộ nhớ trong và bộ nhớ ngoài? Cấu trúc chung của máy tính bao gồm: Bộ xử lí trung tâm, bộ nhớ trong, các thiết bị vào/ra, bộ nhớ ngoài. -Ở các chương trước, chúng ta đã xét các kiểu dữ liệu mà thông tin Input và Output của nó đều được lưu tại bộ nhớ trong. Do đó, khi thoát chương trình hay tắt nguồn điện, các dữ liệu này sẽ bị mất. Muốn xem lại kết quả, ta phải nhập Input và chạy lại chương trình. Có cách nào để ta chỉ nhập Input và chạy chương trình một lần, mà có thể xem thông tin Output bất cứ khi nào? -Trong Pascal, có một kiểu dữ liệu cho phép thực hiện điều đó. Và đó là nội dung của bài học hôm nay. #$ #%&!'() *+,(() -,/0 12!345+4%%%6"7 89:(% *; 7-,<()=8"> )?"/ 2!% Có hai loại tệp thường dùng: ()=8@()"AB L tệp m cc thnh phần của nó được tổ chức theo một cấu trúc nhất định. Gồm cc kí tự được phân chia thnh một hoặc nhiều dòng% 2. Khai bo tệp văn bản &! !"C ụ D!"/#E &! F)#4F)GCHIE 3. Thao tc vi tệp JK<() L0() L0() J/,(!() M/,(3() M=() !%JK<() ASSIGN (<BIẾN TỆP>,<TÊN TỆP>); #$!%&'(% NOOPJQ1)*4R+S;PHS%+NT6E NOOPJQ1)+4R+CUDUNPND%PQDT6E ụ )* 9"()= <+S;PHS%+N )+ 9 " () = < NPND%PQD - ? D0V2!+% ở ệ REWRITE ( < , /0 1 2" ) ; *W?0()XBC D!"/#E &! F)GCHIE HJPQ NOOPJQ1)+4R+CUDUNPND%PQDT6E /!% 3 4 #52 6 ,7-72-/289:;< = 3>( /!% ? 68 9 @ A%(BCD%EC( AF% [...]... đây kết thúc Chúc các em học tập tốt! Program vidu; Var tep1 , tep2 : text; x, y: byte; Begin {MO TEP GHI DU LIEU} assign (tep1 ,’DULIEU.DAT’); rewrite (tep1 ); x:= 10; y:= 5; write (tep1 , x,’ ’, y); {MO TEP GHI DU LIEU} assign (tep2 ,’DULIEU.DAT’); reset (tep2 ); read (tep1 ,x,y); write (x:2, y:2); close (tep2 ); readln End Back Click Chạy Chương Trình ... ASSIGN (tep2 , ‘D:\TP\BAITAP.INP’); READLN (< BIẾN TÊ ÊP >, ); Danh sách biến là một hoặc nhiều biến đơn RESET (tep2 ); READLN (tep2 ,x,y); WRITE (‘Hai so do la’ ,x,y); Close (tep2 ); Readln; END e Thủ tục đóng tệp CLOSE(< TÊN BIẾN TỆP>) GHI DỮ LIỆU RA TỆP ĐỌC DỮ LIỆU TỪ TỆP Program vd1; Var tep2 : TEXT; a,b: integer; Program vd2; Var tep2 : TEXT; x,y: integer; BEGIN BEGIN ASSIGN (tep2 ,... hằng xâu hoặc biểu thức Program vd1; Var tep2 : TEXT; a,b: integer; BEGIN ASSIGN (tep2 , ‘D:\TP\BAITAP.INP’); REWRITE (tep2 ); a:=3; b:=5; WRITE (tep2 ,a,’ ‘,b); Close (tep2 ); Readln; END Giá trị hai biến a=3, b=5 được ghi ở trong tệp BAITAP.INP d Đọc dữ liệu từ tệp Thủ tục mở tệp để đọc dữ liệu RESET (< BIẾN TÊ ÊP >); Thủ tục đọc dữ liệu từ tệp: Program vd2; Var tep2 : TEXT; x,y: integer; BEGIN READ(: Text; Gán tên tệp: ASSIGN(); Mở tệp: - Để đọc: RESET(); - Để ghi: REWRITE(< Tên biến tệp>); Đọc/ghi tệp Đọc: READ(, ); Ghi: WRITE(< Tên biến tệp>,); Đóng tệp CLOSE(< biến têêp>); Bài học đến đây kết thúc Chúc các em học tập tốt! Program vidu; Var tep1 , tep2 : text; x, y: byte; Begin {MO TEP . D!"/E &!F)#4F)GCFE 4^C^FE F kLiHDJlP+S;PHSm !1F)#4T+S;PHS%+NT6E FnF1F)#6E C[#oE^C[]E nF1F)#44TT4^6E {MO TEP GHI DU LIEU} !1F)G4T+S;PHS%+NT6E FF1F)G6E F!/1F)#44^6E nF1CG4^CG6E F1F)G6E F!/ H/% 55p^5-qr 55p^5-qr ! ! . 5F1)+PE D!"/#E &! F)GCHIE !4CFFE HJPQ NOOPJQ1)+4R+CU DU NPND%PQDT6E ZHYZPH1)+PE YZPH1)+88PE !C[EC[]E ZF!/E HQ+% 5F1)+PE HJPQ NOOPJQ1)+4R+CU DU NPND%PQDT6E #$%& " . TỆP>); #$!%&'(% NOOPJQ1)*4R+S;PHS%+NT6E NOOPJQ1)+4R+CU DU NPND%PQDT6E ụ )* 9"()= <+S;PHS%+N )+ 9