Câu 1. Xét theo cách thức truy cập dữ liệu, tệp được phân thành những loại nào?A. Tệp truy cập tuần tự và tệp truy cập trực tiếp.B. Tệp văn bản và tệp có cấu trúc.C. Tệp truy cập tuần tự, tệp truy cập trực tiếp và tệp có cấu trúc.D. Tệp văn bản, tệp có cấu trúc và tệp số nguyên. Câu 2. Để khai báo biến tệp văn bản, ta dùng cú pháp:A. var <tên biến tệp>: text; B. var <tên...
Đọc tiếp
Câu 1. Xét theo cách thức truy cập dữ liệu, tệp được phân thành những loại nào?
A. Tệp truy cập tuần tự và tệp truy cập trực tiếp.
B. Tệp văn bản và tệp có cấu trúc.
C. Tệp truy cập tuần tự, tệp truy cập trực tiếp và tệp có cấu trúc.
D. Tệp văn bản, tệp có cấu trúc và tệp số nguyên.
Câu 2. Để khai báo biến tệp văn bản, ta dùng cú pháp:
A. var <tên biến tệp>: text; B. var <tên tệp>: text;
C. var <tên biến tệp, tên tệp>: text; D. var <tên biến tệp>: string;
Câu 3. Trong các khai báo tệp văn bản sau, khai báo nào là sai?
A. var BT_1: text; B. var BT1: text;
C. var BT1,BT2: text; D. var 1BT: text;
Câu 4. Cú pháp của câu lệnh gắn tên tệp cho biến tệp:
A. assign(<biến tệp>, <tên tệp>); B. assign(<tên tệp>, <biến tệp>);
C. assign(<biến tệp>; <tên tệp>); D. assign(<tên tệp>);
Câu 5. Trong các câu lệnh sau câu lệnh nào đúng?
A. assign(f, „Baitap.txt‟); B. assign(„Baitap.txt‟, f);
C. assign(f); D. assign(f, “Baitap.txt”);
Câu 1:
uses crt;
const fi='dl.doc';
fo='tb.doc';
var f1,f2:text;
a,b:integer;
tbc:real;
begin
clrscr;
assign(f1,fi); reset(f1);
assign(f2,fo); rewrite(f2);
readln(f1,a);
readln(f1,b);
{-----------------------------------cau-a-----------------------------}
writeln('a=',a);
writeln('b=',b);
{-----------------------------------cau-b-----------------------------}
tbc:=(a+b)/2;
writeln(f2,tbc:4:2);
close(f1);
close(f2);
readln;
end.