Bài 1 . Viết chương trình nhập vào một xâu bất kì , nhập vào kí tự k bất kì . Hãy đếm xem trong xâu đó có bao nhiêu kí tự bằng kí tự k . In kết quả ra màn hình Bài 2. Viết chương trình nhập vào hai xâu bất kì , hãy kiểm tra xem kí tự thứ hai của xâu thứ nhất có trùng với kí t

lenguyengiahan

2 năm trước

Bài 1 . Viết chương trình nhập vào một xâu bất kì , nhập vào kí tự k bất kì . Hãy đếm xem trong xâu đó có bao nhiêu kí tự bằng kí tự k . In kết quả ra màn hình Bài 2. Viết chương trình nhập vào hai xâu bất kì , hãy kiểm tra xem kí tự thứ hai của xâu thứ nhất có trùng với kí tự cuối cùng của xâu thứ hai không . In kết quả ra màn hình Bài 3. Viết chương trình nhập vào một xấu bất kì hãy đếm xem trong xâu đó có bao nhiêu từ ( biết rằng mỗi từ sẽ được viết cách nhau một dấu cách space )

Loga Sinh Học lớp 12

0 lượt thích 47 xem

1 trả lời

Thích Trả lời

nguyenthithanhthao18032009

Đây là câu trả lời đã được xác thực

Câu trả lời được xác thực chứa thông tin chính xác và đáng tin cậy, được xác nhận hoặc trả lời bởi các chuyên gia, giáo viên hàng đầu của chúng tôi.

Bài 1:

program b1;
uses crt;
var dem,i:integer;

s:string;

k:char;
begin clrscr;
writeln('Nhap xau: '); readln(s);
write('Nhap ki tu k: '); readln(k);
dem:=0;
for i:=1 to length(s) do
if k=s[i] then dem:=dem+1;
writeln(‘Trong xau co ‘,dem,’ ki tu bang ki tu ‘,k);
readln;
end.

Bài 2:

Program b2;
uses crt;
var s1,s2:string;
begin clrscr;
write('Nhap xau 1: '); readln(s1);
write('Nhap xau 2: '); readln(s2);
if s1[2]=s2 [length(s2)] then writeln('Hai ki tu trung nhau: ',s1[2])
else writeln('Hai ki tu khong trung nhau');
readln;
end.

Bài 3:

program b3;
uses crt;
var s:string;
  i,dem:integer;
begin clrscr;
   write('Nhap xau: '); readln(s);
   dem:=0;
   for i:=1 to length(s) do
   if (s[i] in ['a'..'z']) or (s[i] in ['A'..'Z']) then dem:=dem+1;
   writeln('So tu co trong xau: ',dem);
readln;
end.

Học tốt!

Vote (0) Phản hồi (0) 2 năm trước

tongaeducx

Bài 1:

program oken;
uses crt;
var s: string;
k: char;
dem,i: byte;
begin
clrscr;
write('Nhap 1 xau: '); readln(s);
write('Nhap 1 ki tu k: '); readln(k);
dem:=0;
for i:=1 to length(s) do
if k=s[i] then
dem:=dem+1;
writeln('So ki tu la ',k,' co trong xau: ',dem);
readln;
end.

Bài 2:

program oken;
uses crt;
var s1,s2: string;
begin
clrscr;
write('Nhap xau thu 1: '); readln(s1);
write('Nhap xau thu 2: '); readln(s2);
if s1[2]=s2[length(s2)] then
writeln('2 ki tu trung nhau: ',s1[2])
else
writeln('2 ki tu khong trung nhau');
readln;
end.

Bài 3:

program oken;
uses crt;
var s: string;
i,dem: byte;
begin
clrscr;
write('Nhap xau: '); readln(s);
dem:=0;
for i:=1 to length(s) do
if (s[i] in ['a'..'z']) or (s[i] in ['A'..'Z']) then
dem:=dem+1;
writeln('So tu co trong xau: ',dem);
readln;
end.

Vote (0) Phản hồi (0) 2 năm trước

Các câu hỏi liên quan

......................................................

giải giúp mình vs hai bài này là một nha. câu a hết chỗ nên qua trang ak

Một miếng đất hình tam giác có cạnh đáy là 15m nếu kéo dài cạnh đáy thêm 4m thì diện tích tăng 36m2. Tính diện tích miếng đất khi chưa mở rộng.

khởi nghĩa họ khúc thừa dụ dựng quyền tự chủ ngô quyền (tên cuộc khởi nghĩa , thời gian, ng lãnh đạo, diễn biến chính, kết quả và ý nghĩa) làm mk cái ak mik sẽ cảm ơn và vote 5 cho ak

Vì sao Nguyễn Ái Quốc ra đi tìm đường cứu nước mới ? So sánh với con đường của những bậc tiền bối đi trước?

Giúp mk vs mn ơi :))) 🥺🥺🥺🥺🥺🥺🥺🥺🥺🥺🙏🏻🙏🏻🙏🏻🙏🏻🙏🏻🙏🏻 Vote 5 sao nek:)

một bể nước dạng hình hộp chữ nhật có kick thước ở trong long bể là chiều dài 2 m, chiều rộng 1,5 m và chiều cao 1 m. Mứ nước trong bể cao bằng 4/5 chiều cao của bể. Hỏi trong bể có bn lít nước (1dm3= 1 lít)

Thế nào là sống và làm việc có kế hoạch ý nghĩa sống và làm việc có kế hoạch cho ví dụ minh họa giúp em vs ạ

đặc điểm ko phải biểu hiện của tình hình kinh tế, xã hội anh trc cách mạng. a. xuất hiện tầng lớp quý tộc mới b. quốc hội mâu thuẫn vơi vua và quý tộc phong kiến cũ c. tư sản giàu lên nhanh chóng d. chia thành 3 đẳng cấp.

Cho tam giác ABC cân tại A , đường cao AH . Biết AB =10 cm , BC = 12 cm a) Chứng minh tam giác ABH bằng tam giác ACH b) Tính độ dài đoạn thẳng AH. Gọi G là trọng tâm của tam giác ABC . Chứng minh ba điểm A,G,H thẳng hàng Mn giải giúp e vs ạ e cần gấp trong tối nay để nộp rồi ạ

Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến