Số hoàn hảo Tên file: BHHAO.CPP Trong một buổi học toán Bờm được học khái niệm về số có tính chất đặc biệt. Số hoàn hảo là số có tổng các ước trừ nó ra thì bằng chính nó. Ví dụ: Số 6 là số hoàn hảo vì nó có tổng các ước 1 + 2 + 3 = 6, số 8 không phải là số hoàn hảo vì 1 + 2 + 4 = 7 8. Yêu cầu: Cho dãy số a1, a2,... an. Hãy giúp Bờm đếm xem trong dãy có bao nhiêu số có tổng các chữ số là số hoàn hảo. INPUT: BHHAO.INP Dòng đầu tiên là số nguyên dương n (n 100). n dòng tiếp theo ghi n số nguyên a1, a2,... an (0 ai 109). OUTPUT: BHHAO.OUT Một dòng duy nhất là kết quả của bài toán. Ví dụ: BHHAO.INP BHHAO.OUT 3 42 5 9955 2 freeopen nx nha c++

#include <bits/stdc++.h>
#define ll long long

using namespace std;
ll tcs(ll n)
{
    ll s=0;
    while(n!=0)
    {
        s+=n%10;
        n/=10;
    }
    return s;
}
ll hh(ll n)
{
    int cnt = 0;
    for(ll i = 1; i * i <= n; i++)
    {
        if(n%i==0)
        {
            cnt+=i;
            if(n/i!=i) cnt+=n/i;
        }
    }
    return cnt-n == n;
}
int main()
{
    freopen("BHHAO.INP", "r", stdin);  
    freopen("BHHAO.OUT", "w", stdout);
    ll n,res,d=0;
    cin>>n;
    for(int i=1;i<=n;i++) 
    {
        cin>>res;
        if(hh(tcs(res))) d++;
    }
    cout<<d;
}

#include<bits/stdc++.h>
using namespace std;
#define ll long long 
ll tuoc(ll n){
  ll s=0;
    for(int i=1; i<=sqrt(n); i++)
        if (n%i == 0)
            s = s + i + n/i;
    ll  k = sqrt(n);
    if (k*k == n)
        s = s - k;
    return s;
}
ll tcs(ll n){
    ll s=0;
    while(n){
        s+=n%10;
        n/=10;
    }return s;
}
int main(){
    ll n,dem=0;
    cin >>n;
    ll a[n+1];
    for(int i =1;i<=n;i++){
        cin >>a[i];
    }
    for(int i =1;i<=n;i++){
        if(tuoc(tcs(a[i]))-tcs(a[i])==tcs(a[i])){
            dem++;
        }
    }cout <<dem;
    
}