Bài 1:

#include<bits/stdc++.h>
using namespace std;
int main()
{
    string s;
    char k;
    int samon247;
    cin>>s>>k;
    for(int i=0;i<s.length();i++){
        if(s[i]==k){
            samon247++;
        }
    }
    cout<<samon247;
    return 0;
}

Bài 2:

#include<bits/stdc++.h>
using namespace std;
int main()
{
    string samon247,t;
    cin>>samon247>>t;
    if(samon247[1]==t[t.length()-1]){
        cout<<"Trung";
        return 0;
    }
    cout<<"Khong trung";
    return 0;
}

Bài 3:

#include<bits/stdc++.h>
using namespace std;
int main()
{
    string samon247;
    int a=1;
    getline(cin,samon247);
    for(int i=0;i<samon247.length();i++){
        if(samon247[i]==' '){
            a+=1;
        }
    }
    cout<<a;
    return 0;
}

`1)`

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.

`2)`

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.

`3)`

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.