Cho 1 xâu ( có chứa kí tự cách). In ra màn hình vị trí đầu tiên xuất hiện kí tự dấu cách trong xâu.
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.
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.
Nhậo vào bàn phím xâu C
a, tính độ dài xâu
b, thực hiện tạo xâu mới gồm 4 kí tự bắt đầu từ vị trí thứ 5 trong xâu
c, đếm xem xâu có bao nhiêu kí tự b
d, in các kết quả ra màn hình
uses crt;
var st:string;
i,dem:integer;
begin
clrscr;
readln(st);
writeln(length(st));
for i:=5 to 8 do write(st[i]);
writeln;
dem:=0;
for i:=1 to length(st) do
if st[i]='b' then dem:=dem+1;
writeln(dem);
readln;
end.
1.Viết chương trình nhập vào 1 xâu (s1) và in ra màn hình xâu đã nhập. + nhập vào xâu thứ 2 và in ra màn hình xâu dài hơn( nếu bằng nhau thì in ra xâu nhập sau) +kiểm tra kí tự đầu tiên trong xâu S1 có trùng với kí tự cuối cùng của xâu S2 khong? +in ra màn hình xâu đảo ngược của xâu S1 +in ra xâu S1 khi đã loại bỏ kí tự trắng ( nếu có) +in ra xâu chỉ có kí tự là chữ cái xuất hiện trong xâu S2( không phân biệt chữ hoa, thường) +đếm xem có bao nhiêu chữ số trong xâu S2. Ét o ét mọi người ơi
Viết chương trình bằng ngôn ngữ lập trình pascal 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,mọi người giúp em với ạ
uses crt;
var st:string;
i,d,dem:integer;
begin
clrscr;
write('Nhap xau:'); readln(st);
d:=length(st);
dem:=0;
for i:=1 to d do
if st[i]=#32 then inc(dem);
writeln(dem);
readln;
end.
Đọc từ tệp ‘xau.đặt’ ra 1 xâu ký tự s có độ dài tối đa 50 kí tự a, nếu trong xâu có 3 dấu cách thì xoá 2? b, chuyển các ký tự trong xâu thành in hoa? c, đếm các chữ số có trong xâu? Đưa các kết quả ra màn hình?
Viết chương trình nhập vào xâu và một ký tự ch. Trả về vị trí xuất hiện đầu tiên của kí tự ch trong xâu
Bài 6: Viết CT thực hiện các yêu cầu sau:
- Đọc vào một xâu kí tự.
- Sắp xếp lại xâu này sao cho kí tự thứ 1 đổi chỗ cho kí tự thứ
n, kí tự thứ 3 đổi chỗ cho kí tự thứ n-2,… kí tự ở vị trí chẵn
không đổi.
- Đưa xâu đã sắp xếp ra màn hình.
#include <bits/stdc++.h>
using namespace std;
string st;
int d,i;
int main()
{
getline(cin,st);
d=st.length();
for (i=0; i<=d-1; i++) swap(st[i],st[n-1-(i-1)]);
cout<<st;
return 0;
}
nhập 1 xâu kí tự (gồm chữ và số), sau đó in ra màn hình các chữ số có trong xâu và vị trí của số trong câu.
#include <bits/stdc++.h>
using namespace std;
string st;
int d,i;
int main()
{
getline(cin,st);
d=st.length();
for (i=0; i<d; i++)
if ((int(st[i])>=48) and (int(st[i])<=57)) cout<<st[i]<<" ";
cout<<endl;
for (i=0; i<=d-1; i++)
if ((int(st[i])>=48) and (int(st[i])<=57)) cout<<i<<" ";
return 0;
}
Giải giúp mình nhé
Tạo file mang tên BAI2.pas
Viết chương trình nhập vào một xâu kí tự A.
a) In xâu A ra màn hình.
b) Cho biết có bao nhiêu từ trong xâu A.
c) Nhập vào xâu kí tự B, cho biết xâu B xuất hiện bao nhiêu lần trong xâu A.