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:

Hãy chọn thứ tự hợp lí nhất khi thực hiện các thao tác đọc dữ liệu từ tệp :

Câu lệnh dùng thủ tục để đóng tệp có dạng:

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

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

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

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

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

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

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

s:= ‘54321’;

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:

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

if length(s1) < length(s2) then writeln(s1) else writeln(s2);

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

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

s := ‘Mua xuan’;

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

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

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

s := ‘1001010’;

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

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, 2);

write(s);

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

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

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

insert(s2 , s1 , 2);

write(s2);

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

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

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

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à dấu cách có trong xâu.

Viết các câu lệnh để đọc dữ liệu từ tệp “dulieu.txt” 2 biến a, b (sử dụng biến tệp f1).

Khi viết một chương trình muốn trả về một giá trị ta nên dùng:

Chương trình con gồm có: (chọn câu trả lời đúng nhất)

Để khai báo hàm trong Pascal bắt đầu bằng từ khoá:

C của việc sử dụng chương trình con:

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 :

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

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

Câu lệnh dùng để đọc dữ liệu từ tệp văn bản có dạng:

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

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

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

Trong PASCAL, để khai báo biến tệp văn bản ta phải sử dụng cú pháp:

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

s:= ‘123456’;

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:

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à:

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

s := ‘Mua xuan’;

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

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

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

s := ‘abcde’;

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

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, 1);

write(s);

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 , 2);

write(s1);

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

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

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

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.