Thứ năm, 26/12/2024
IMG-LOGO

Câu hỏi:

08/07/2024 178

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.

Trả lời:

verified Giải bởi qa.haylamdo.com

Var a: string;

 i, Dem: integer;

Begin

 writeln(‘nhap xau:’);

 Readln(a);

 Dem:=0;

 For i:=1 to length(a) do

 If (‘a’<=a[i]) and (a[i]<=’z’)

  Dem:= Dem+1;

 Writeln(Dem);

 Readln

End.

Câu trả lời này có hữu ích không?

0

CÂU HỎI HOT CÙNG CHỦ ĐỀ

Câu 1:

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:

Xem đáp án » 01/09/2021 1,144

Câu 2:

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

Xem đáp án » 01/09/2021 1,128

Câu 3:

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

Xem đáp án » 01/09/2021 1,014

Câu 4:

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).

Xem đáp án » 01/09/2021 985

Câu 5:

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

Xem đáp án » 01/09/2021 934

Câu 6:

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

Xem đáp án » 01/09/2021 932

Câu 7:

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

Xem đáp án » 01/09/2021 569

Câu 8:

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

Xem đáp án » 01/09/2021 459

Câu 9:

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

Xem đáp án » 01/09/2021 451

Câu 10:

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

Xem đáp án » 01/09/2021 402

Câu 11:

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

Xem đáp án » 01/09/2021 378

Câu 12:

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 :

Xem đáp án » 01/09/2021 329

Câu 13:

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

Xem đáp án » 01/09/2021 312

Câu 14:

Trong PASCAL, cú pháp khai báo biến tệp văn bản là:

Xem đáp án » 01/09/2021 311

Câu 15:

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

Xem đáp án » 01/09/2021 291