Phát biểu nào sau đây là đúng với chương trình Vi_Du ?
Program Vi_Du ;
Uses crt ;
Var f : text ; ch : char ; tenfile : string[30] ;
Begin
Write(‘ Nhap ten file : ’) ; readln(tenfile) ;
Assign(f, ‘tenfile’) ; Reset(f) ;
Whilenot eof(f) do
Begin
Read(f, ch) ;
Write(ch) ;
End ;
Close(f) ;
End.
A. Chương trình dùng để mở đọc một tệp đã có và hiện nội dung trong tệp này lên màn hình.
B. Chương trình dùng để tạo một tệp mới và ghi nội dung nhập từ bàn phím vào trong tệp.
C. Chương trình dùng để mở đọc một tệp đã có và cho phép nhìn thấy toàn bộ kí tự có trong tệp này lên màn hình.
D. Cả 3 khẳng định trên đều sai.
Giải bởi Vietjack
Chương trình dùng để mở ra để đọc một tệp đã có (lệnh Read(f,ch)) và hiện nội dung trong tệp này lên màn hình (lệnh Write(ch)).
Đáp án: A
Trong Pascal, cho trước tệp văn bản BT2.TXT chỉ có một dòng, chứa dòng chữ : CHAO MUNG BAN DEN VOI LAP TRINH ngay ở đầu dòng. Thực hiện chương trình VD_bt2_txt dưới đây, trên màn hình sẽ hiện kết quả nào trong các kết quả cho dưới đây ?
ProgramVD_bt2_txt;
Uses crt ;
Var f : text ;
S : string[13] ;
Begin
Clrscr;
Assign(f, ‘BT2.TXT ’) ;
Reset(f) ;
Read(f, S) ;
Write(S) ;
Close(f) ;
End .
Trong Pascal, thực hiện chương trình VD_bt1_txt dưới đây sẽ ghi kết quả nào trong các kết quả cho dưới đây vào tệp văn bản BT1.TXT ?
ProgramVD_bt1_txt;
Uses crt ;
Var f : text ;
Begin
Clrscr;
Assign(f, ‘BT1.TXT ’) ;
Rewrite(f) ;
Write(f, 123 + 456) ;
Close(f) ;
End .
Cho biết f1 là biến tệp văn bản và tệp ketqua.txt có nội dung đang lưu trữ là: Tich 2 so la: 20. Hãy cho biết sau khi thực hiện đoạn lệnh sau:
a := 10; b :=2;
assign(f1, 'ketqua.txt');
rewrite(f1);
writeln(f1, 'Thuong 2 so la: ', a/b);
thì tệp ketqua.txt có nội dung gì?
Trong mặt phẳng hệ tọa độ Descartes vuông góc, cho điểm M(x, y). Hãy viết câu lệnh tính khoảng cách d từ điểm M đến gốc tọa độ O:
Hãy viết lệnh tính điện trở tương đương Rtd cho sơ đồ mạch điện gồm 3 điện trở R1, R2, R3 mắc nối tiếp với nhau là:
Trong mặt phẳng hệ tọa độ Descartes vuông góc, cho 2 điểm M(x1,y1) và N(x2,y2). Hãy viết câu lệnh tính khoảng cách d từ điểm M đến N:
Hãy viết lệnh tính điện trở tương đương Rtd cho sơ đồ mạch điện gồm 3 điện trở R1, R2, R3 mắc song song với nhau:
Cho trước tệp văn bản BT_TD gồm hai dòng như sau :
TRAN MINH HAI 9 8 7
NGUYEN QUANG VINH 10 5 9
ProgramThi_Du ;
Uses crt ;
Const fi = ‘BT_TD’ ;
Var f : text ; s : string ; t, l, h : integer ;
Begin
Assign(f, ‘fi’) ; Reset(f) ;
While not eof(f) do
Begin
Readln(f, s, t, l, h) ;
Writeln(s, ‘ ’, t, ‘ ’, l, ‘ ’, h) ;
End ;
Close(f) ;
Readln
End.
Khi thực hiện chương trình Thi_Du sẽ cho kết quả nào trong các kết quả sau đây?
