Hỏi đáp về Thao tác với tệp - Tin học 11

Yêu cầu: a) đọc và tính tổng các số chẵn ghi vào tệp SN.OUT

b) đọc và tính tổng các số lẻ ghi vào tệp SN.OUT

c) đọc và ghi vào tệp dãy số nguyên đó theo chiều ngược lại vào tệp SN.OUT

+ Tọa độ của mỗi đỉnh nằm trên một dòng

+ Các số nguyên cách nhau bởi một khoảng cách tương ứng

Sau đó xem dữ liệu đã ghi vào tệp

D:\DULIEU.TXT 2 3

D:\KETQUA.TXT 3

INPUT.TXT 2 3

OUTPUT.TXT 6

Ví dụ: Trên màn hình chạy dòng 19 số: 1 0 2 0 0 3 1 1 1 0 2 1 0 0 2 1 2 0 1. Kết quả trả lời đúng là: tổng các số mỗi dãy con là 3, số dãy con nhiều nhất là 6, bao gồm các dãy con là: 1 0 2, 0 0 3, 1 1 1, 0 2 1, 0 0 2 1, 2 0 1

+Dữ liệu vào: File văn bản GAMESHOW.INP

- Dòng 1 chứa số nguyên dương N.

- Dòng 2 chứa N số chạy trên màn hình, các số cách nhau bởi dấu cách.

+ Dữ liệu ra: Ghi ra file văn bản GAMESHOW.OUT

- Dòng 1 là tổng các số của một dãy con.

- Dòng 2 là số K (số dãy con nhiều nhất chia được).

- Dòng 3 là các vị trí cuối cùng của từng dãy con, các số vị trí này cách nhau bởi dấu cách.

Ví dụ:

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, ct 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, ct sử dụng bao nhiêu câu lệnh đóng tệp? Không đóng tệp được không? Vì sao?

+ Dòng 1 ghi giá trị S

+ Dòng 2 ghi giá trị C