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:
A. Để chương trình gọn hơn
B. Tránh được việc phải viết lặp đi lặp lại cùng một dãy lệnh nào đó
C. Hỗ trợ việc viết chương trình có cấu trúc như cấu trúc lặp, rẽ nhánh
D. Không có lợi ích
Đáp án đúng : B
Viết các câu lệnh để ghi dữ liệu vào tệp KQ.TXT 2 biến C, V (sử dụng biến tệp f).
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à 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.
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à:
Cho đoạn chương trình sau:
s := ’ABCDEF’;
delete(s, 3, 2);
insert(‘XYZ’, s, 4);
write(s);
Kết quả in ra màn hình là:
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 :
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 := ‘1001010’;
write(pos(‘011’, s));
Kết quả in ra màn hình là:
Cho đoạn chương trình sau:
s:= ‘edcba’;
For i:= length(s) downto 1 do write(s[i]);
Kết quả in ra màn hình là: