Đọc chương trình sau và trả lời các câu hỏi: Program giaiptbac1; Var f1, f2 : text; a, b : integer; x : real; Begin assign(f1, ‘input.txt'); reset(f1); assign(f2, ‘output.txt'); rewrite(f2); while not eof(f1) do begin read(f1,a,b); x:=-b/a; writeln(f2,‘nghiem la: ',x:7:1); end; close(f1); close(f2); End. a. Chương trình sử dụng bao nhiêu tệp, biến tệp? Kể tên? b. Tệp input.txt, output.txt được gắn cho những biến tệp nào? Nó dùng để đọc hay ghi dữ liệu? c. Chỉ ra câu lệnh gắn tên tệp, mở tệp của tệp input.txt và output,txt; Câu lệnh đọc tệp? Câu lệnh ghi tệp? d. Điều kiện để tham chiếu đến tất cả các cặp số nguyên trong tệp input.txt? e. Chương trình sử dụng bao nhiêu câu lệnh đóng tệp? Không đóng tệp được không? Vì sao? giúp e với ạ

1 câu trả lời

a. Chương trình sử dụng 2 tệp, 5 biến tệp

Kể tên: tệp (input.txt&#39 và output.txt&#39); biến tệp (f1,f2,a,b,x)

b. Tệp input.txt, output.txt được gắn cho biến tệp f1,f2

input.txt dùng để đọc dữ liệu

output.txt dùng để ghi dữ liệu

c. Câu lệnh gắn tên tệp, mở tệp của tệp input.txt và output,txt :

assign(f1, ‘input.txt'); reset(f1);

assign(f2, ‘output.txt'); rewrite(f2);

Câu lệnh đọc tệp:

read(f1,a,b);

Câu lệnh ghi tệp

writeln(f2,‘nghiem la: ',x:7:1);

d. Điều kiện để tham chiếu đến tất cả các cặp số nguyên trong tệp input.txt :

phải có f1 trước mọi câu lênh đọc 

e. Chương trình sử dụng 1 câu lệnh đóng tệp
Không đóng tệp thì không được. Vì nếu không đóng dữ liệu thực sẽ không thể lưu lại 

Câu hỏi trong lớp Xem thêm