Xét chương trình sau:

var i : longint;

f : text;

BEGIN

assign (f, 'A.txt');

rewrite(f);

i:=123456;

writeln(f, i);

write (f, -789);

close(f);

END

Sau khi thực hiện chương trình, tệp A.txt có nội dung như thế nào?

Xét chương trình sau:

Var f: text;

begin

Assign (f, 'ABC.txt');

Rewrite(f);

write (f, 105+304-234);

close(f);

end.

Sau khi thực hiện chương trình, tệp ABC.txt có nội dung như thế nào?

Xét chương trình sau:

var a : real;

f :text;

BEGIN

assign (f, 'A txt'); rewrite(f);

a:=12.345;

writeln(f, a)

close(f);

END

Sau khi thực hiện chương trình, tệp A.txt có nội dung như thế nào?

Xét chương trình sau:

var a, b : longint;

f :text;

BEGIN

assign (f, 'A.txt');

rewrite(f);

a:=123456; b:=456;

write (f, a-b);

close(f);

END.

Sau khi thực hiện chương trình, tệp A.txt có nội dung như thế nào?

Xét chương trình sau:

var a,b longint;

f :text:

BEGIN

assign (f, 'A txt');

rewrite (f);

a:=123456;

b: =456;

writeln(f, a,b);

writeln(f, b, a);

close(f);

END

Sau khi thực hiện chương trình, tệp A.txt có nội dung như thế nào?

Để thao tác với tệp trước hết ta phải làm gì?

Dữ liệu kiểu tệp được lưu ở đâu?

Khi tiến hành mở tệp để ghi và tìm thấy tệp thì sẽ ra sao?

Để ghi dữ liệu vào tệp văn bản, ta có thể sử dụng thủ tục nào?

Để gán tệp KETQUA.TXT cho biến tệp f ta sử dụng câu lệnh nào?

Thủ tục đóng tệp có dạng gì?

Cho chương trình sau:

Program Chuong_Trinh;

Var a, b, S : byte;

Procedure TD(Var x : byte ; y : byte);

    Var i : byte;

Begin

    i := 5;

writeln(x,‘  ’, y);

x := x + i ;

y := y + i ;

S := x + y ;

Writeln(x,‘  ’, y);

End;

Begin

    Write(‘nhập a và b : ’);

Readln(a, b);

TD(a,b);

Writeln(a,‘  ’, b, ‘  ’, S);

Readln;

End.

Trong chương trình trên có các tham số thực sự là:

Khi tiến hành mở tệp để ghi mà không tìm thấy tệp thì như thế nào?

Hàm chuẩn nào biến giá trị thực 6 thành 7?

Nếu hàm eof (< biến tệp >) cho giá trị bằng TRUE thì con trỏ tệp nằm ở vị trí nào?