viết chương trình nhập từ bàn phím xâu kí tự s có độ dài không quá 150. hãy cho biết độ dài của xâu và có bao nhiêu chữ a nhỏ xuất hiện trong xâu s . thông báo kết quả ra màn hình
Quảng cáo
1 câu trả lời 602
4 năm trước
program chu_a;
uses crt;
var s:string[150];
i,d:byte;
begin
clrscr;
write('Nhap xau: '); readln(s);
d:=0;
for i:=1 to length(s) do
if s[i]='a' then d:=d+1;
write('Co ',d,' chu a trong xau ',s);
readln;
end.
Quảng cáo
Bạn cần hỏi gì?
Câu hỏi hot cùng chủ đề
-
Đã trả lời bởi chuyên gia
15887 -
Đã trả lời bởi chuyên gia
10045 -
Đã trả lời bởi chuyên gia
6762 -
Đã trả lời bởi chuyên gia
6203
Gửi báo cáo thành công!
