Cho xâu kí tự sau: s:= ‘Nguyen Trai’. Lệnh nào sau đây cho kết quả ‘Nguyen’

Chương trình con thực hiện các thao tác nhất định nhưng không trả về giá trị nào qua tên của nó là:

Cho đoạn chương trình sau:

s := ‘1001010’;

write(pos(‘011’, s));

Kết quả in ra màn hình là:

Câu lệnh Reset(<biến tệp>) ; có ý nghĩa gì?

Câu lệnh dùng để đóng tệp f2 là:

Cho đoạn chương trình sau:

s1 := ‘123’; s2 := ‘abc’;

insert (s2 , s1 , 1);

write(s1);

Kết quả in ra màn hình là:

Câu lệnh dùng để ghi kết quả vào tệp văn bản có dạng:

Chương trình con gồm có: (chọn câu trả lời đúng nhấ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à số có trong xâu.

Var a: string;

 I,dem: integer;

Begin

 Readln(a);

 Dem:=0;

 For i:=1 to length(a) do

 If (‘0’<=a[i]) and (a[i]<=’9’) then dem:=dem+1;

 Writeln(dem);

 Readln

End.

Chọn phát biểu đúng trong các phát biểu dưới đây khi nói về lợi ích của việc sử dụng chương trình con:

Cho đoạn chương trình sau:

s := ‘Mua xuan’;

write(upcase(s[length(s)-1]));

Kết quả in ra màn hình là:

Câu lệnh Var <tên biến tệp> : Text; có ý nghĩa là:

Để gắn tên tệp cho tên biến tệp ta sử dụng câu lệnh:

Nếu hàm eof( ) cho giá trị bằng true thì con trỏ tệp nằm ở vị trí:

Xâu rỗng là xâu có độ dài bằng:

Câu lệnh để gắn tên tệp ‘bai1.txt’, cho biến tệp f là: