Câu hỏi:

09/07/2020 14,966

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.

Siêu phẩm 30 đề thi thử THPT quốc gia 2024 do thầy cô VietJack biên soạn, chỉ từ 100k trên Shopee Mall.

Mua ngay

Quảng cáo

Trả lời:

verified
Giải bởi Vietjack

Var a: string;

  i, Dem: integer;

Begin

 writeln(‘nhap xau:’);

 Readln(a);

 Dem:=0;

 For i:=1 to length(a) do

 If a[i] =’ ‘ then

  Dem:= Dem+1;

 Writeln(Dem);

 Readln

End.

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

Câu 1:

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 » 09/07/2020 41,322

Câu 2:

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

Xem đáp án » 09/07/2020 37,839

Câu 3:

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

Xem đáp án » 09/07/2020 25,090

Câu 4:

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

Xem đáp án » 09/07/2020 22,880

Câu 5:

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

Xem đáp án » 09/07/2020 13,205

Câu 6:

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

Xem đáp án » 09/07/2020 13,183

Bình luận


Bình luận