Câu lệnh Assign(<biến tệp> , <tên tệp) ; có ý nghĩa gì?
A. Thủ tục gắn tên tệp cho tên biến tệp
B. Thủ tục mở tên để đọc dữ liệu
C. Khai báo biến tệp
D. Thủ tục đóng tệp
Giải bởi Vietjack
Đáp án A
Gói VIP thi online tại VietJack (chỉ 400k/1 năm học), luyện tập gần 1 triệu câu hỏi có đáp án chi tiết
Viết chương trình:
Nhập vào một xâu kí tự.
Đếm và in ra màn hình số kí tự là chữ cái (chữ thường) có trong xâu.
Hãy chọn thứ tự hợp lí nhất khi thực hiện các thao tác ghi dữ liệu vào tệp
Cho đoạn chương trình sau:
s := ‘abcde’;
write(pos(‘aba’, s));
Kết quả in ra màn hình là:
Cho đoạn chương trình sau:
s:= ‘abcd’;
For i:= length(s) downto 1 do write(s[i]);
Kết quả in ra màn hình là:
Cho đoạn chương trình sau:
s := ’ABCDEF’;
delete(s, 3, 2);
insert(‘XYZ’, s, 3);
write(s);
Kết quả in ra màn hình là:
Cho đoạn chương trình sau:
s1 := ‘1234’; s2 := ‘abc’;
if length(s1) > length(s2) then writeln(s1) else writeln(s2);
Kết quả in ra màn hình là:
Viết các câu lệnh để đọc dữ liệu từ tệp “DL.TXT” 2 biến x1, x2 (sử dụng biến tệp f).
Cho đoạn chương trình sau:
s := ‘Mua xuan’;
write(upcase(s[length(s)-3]));
Kết quả in ra màn hình là:
Cho đoạn chương trình sau:
s1 := ‘123’; s2 := ‘abc’;
insert(s1 , s2 , 1);
write(s1);
Kết quả in ra màn hình là:
Cho xâu kí tự sau: s:= ‘Nguyen Trai’. Lệnh nào sau đây cho kết quả ‘Trai’
