Câu 1:

#include<bits/stdc++.h>
using namespace std;
int main()
{
    int n,chan=0,le=0;
    cin>>n;
    int arr[n];
    for(int i=0;i<n;i++){
        cin>>arr[i];
    }
    for(int i=0;i<n;i++){
        if(arr[i]%2==0){
            chan+=arr[i];
        }
        else{
            le+=arr[i];
        }
    }
    cout<<"Tong cac so chan: "<<chan<<"\nTong cac so le: "<<le;
    //samon247
    return 0;
}
Câu 2:

#include<bits/stdc++.h>
using namespace std;
int main()
{
    string s;
    int a=0,A=0;
    getline(cin,s);
    for(int i=0;i<s.length();i++){
        if(s[i]=='a'){
            a+=1;
        }
        if(s[i]=='A'){
            A+=1;
        }
    }
    cout<<"So ki tu 'a' la: "<<a<<"\nSo ki tu 'A' la: "<<A;
    //samon247
    return 0;
}
Câu 3:

Đề cần rõ ràng hơn ?

Câu 1 :

uses crt;
var a : array[1..100] of integer;
n,i ,c,l : integer;
begin c:=0; l:=0;
write('Nhap n:'); readln(n);
for i:=1 to n do begin
write('Nhap phan tu ',i,':'); readln(a[i]);
end;
for i:=1 to n do if a[i] mod 2=0 then c:=c+a[i] else l:=l+a[i];
write('Tong chan :', c);
write('Tong le :', l);
readln
end.

Câu 2 :

uses crt;
var s : string;
i : integer;
d1,d2 : integer;
begin
d1:=0; d2:=0;
write('Nhap xau :'); readln(s);
for i:=1 to length(s) do if s[i]='a' then d1:=d1+1 else if s[i]='A' then d2:=d2+1;
writeln('So luong ki tu a la :', d1);
writeln ('So luong ki tu A la :', d2);
readln
end.