Khi thực hiện 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?
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.
A. CHAO MUNG BAN DEN VOI LAP TRINH
B. CHAO MUNG BAN
C. CHAO MUNG BAN DEN VOI
D. CHAO MUNG
Lời giải của giáo viên
ToanVN.com
Câu lệnh Read(f, S) ; nghĩa là đọc chuỗi S từ tệp ‘ BT2.TXT’. với S là chuỗi gồm 13 kí tự. Vì vậy sẽ lấy 13 kí tự từ trái qua phải.
Đáp án: B
CÂU HỎI CÙNG CHỦ ĐỀ
Nhận định nào đúng cho khai báo sau: Var hoten : String;?
Trong Turbo Pascal, để chạy chương trình ta dùng tổ hợp nào?
Với x, y, z là ba biến nguyên. Cách nhập giá trị nào sau đây là sai khi muốn nhập giá trị 3, 4, 5 cho ba biến này từ bàn phím bằng câu lệnh readln(x,y,z); ?
Mảng là kiểu dữ liệu biểu diễn một dãy các phần tử thuận tiện cho việc gì?
Để thoát khỏi phần mềm Turbo Pascal ta dùng tổ hợp nào?
Cho khai báo mảng hãy cho biết đoạn chương trình sau thực hiện công việc gì dưới đây?
Var a : array[0..50] of real ;
k := 0 ;
for i := 1 to 50 do
if a[i] > a[k] then k := i ;
Hãy cho biết sau khi thực hiện đoạn lệnh sau thì tệp ketqua.txt có nội dung gì? Với 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
a := 10; b :=2;
assign(f1, 'ketqua.txt');
rewrite(f1);
writeln(f1, 'Thuong 2 so la: ', a/b);