Giả sử trên đĩa tồn tại một tệp F chứa các số nguyên có tên KQ.DAT, để đọc dữ liệu từ tệp, ta lần lượt thực hiện các thao tác:

A. Assign(F,'KQ.DAT');

Reset(F);

Close(F);

B. Reset(F);

Read(F,x);

Assign(F,'KQ.DAT');

Close(F);

C. Assign(F,'KQ.DAT');

Rewrite(F);

Read(F,x);

Close(F);

D. Assign(F,'KQ.DAT');

Reset(F);

Readln(F,x);

Close(F);

Chọn C

Chọn phương án A.

B

B

B

Bạn Mèo nói Đúng

MÈO MÉO MEO MÈO MEO

a.

- Tạo thư mục Lop 4B

Bước 1. Mở thư mục Học tap và giai tri--> chọn dải lệnh Home

Bước 2. Nhấn nút New folder 

Bước 3. Nhập tên: Lop 4B và nhấn enter

- Sao chép:

Bước 1: Mở thư mục Lop 4A

Bước 2: Chọn thư mục cần sao chép: To 1, To 2, To 3, To 4, tệp Gioi thieu lop 4A.

Bước 3: Chọn thẻ Home rồi nháy chuột vào nút lệnh copy

Bước 4: Mở thư mục Lop 4B

Bước 5: Nháy chuột vào nút lệnh paste và kết quả được hiện ra.

- Di chuyển

1. Mở thư mục Lop 4A

2. Chọn tệp Gioi thieu lop 4A

3. Chọn thẻ Home rồi nháy chuột vào nút lệnh Cut

4. Mở thư mục Lop 4B

5. Nháy chuột vào nút lệnh Paste và kết quả được hiện ra

- Đổi tên tệp

Bước 1. Mở thư mục Lop 4B

Bước 2. Chọn tệp Gioi thieu lop 4A và nháy nút Rename  trên dải lệnh Home

Bước 3. Gõ tên mới: Bai tham khao rồi gõ phím enter

b. Xóa tệp

Bước 1. Mở thư mục Lop 4B

Bước 2. Chọn tệp Bai tham khao và nháy nút Delete  trên dải lệnh Home

c. Xóa thư mục lớp 4B:

Bước 1. Mở thư mục Hoc tap va giai tri

Bước 2. Chọn thư mục Lop 4B và nháy nút Delete  trên dải lệnh Home

const fi='bt.inp'

fo='bt.out'

var f1,f2:text;

a:array[1..100]of integer;

i,n,ln:integer;

begin

assign(f1,fi); reset(f1);

assign(f2,fo); rewrite(f2);

readln(f1,n);

for i:=1 to n do read(f1,a[i]);

ln:=a[1];

for i:=1 to n do 

if ln<a[i] then ln:=a[i];

write(f2,ln);

close(f1);

close(f2);

end.