KTLT 8) SỐ ĐẸP

Tiêu đề: KTLT 8) SỐ ĐẸP Tue May 10, 2022 4:43 pm

KTLT SỐ ĐẸP
Một số nguyên dương được gọi là số đẹp nếu tổng các chữ số của nó (trong hệ thập phân) chia hết cho số chữ số. Các số được xét không chứa số 0 không có nghĩa. Ví dụ, 15 là một số đẹp vì 1+5 chia hết cho 2.
Các số đẹp được đánh số từ 1 trở đi theo thứ tự tăng dần của giá trị.
Yêu cầu: Cho số nguyên dương n (1 ≤ n ≤100 000). Hãy tìm số đẹp thứ n.
Dữ liệu: Vào từ file văn bản BEAUTY.INP gồm nhiều tests, mỗi test ghi trên một dòng chứa một số nguyên n.
Kết quả: Đưa ra file văn bản BEAUTY.OUT, kết quả mỗi test đưa ra trên một dòng.
Ví dụ:
BEAUTY.INP
1
15
8
BEAUTY.OUT
1
20
8

Tổng số bài gửi : 71 Join date : 10/05/2022

Code:: #include <bits/stdc++.h>
using namespace std;

int n,coun,test=1;

void nhap()
{
cin >> n;
}

int main()
{
ios_base::sync_with_stdio(false); cin.tie(0);;
nhap();
while(true)
{
int sum=0,temp=test,num=0;
while (temp > 0)
{
sum += temp % 10;
temp /= 10;
num++;
}
if (sum % num == 0)
{
coun++;
if (coun == n)
{
cout << test;
return 0;
}
}
test++;
}
return 0;
}

Tiêu đề: Re: KTLT 8) SỐ ĐẸP Thu May 12, 2022 4:42 pm

Thuật toán:

- Tổ chức các hàm:
tongcs (u) - tính tổng các chữ số của u;
demcs(u) - đếm số lượng chữ số của u.
Hàm kiemtra(u) - kiểm tra u là số đẹp.
Hàm tìm sodepn(u) - trả về số đẹp thứ u.
- Tìm Tmax là giá trị lớn nhất của input.
- Gọi hàm tìm sodepn(Tmax) thu được mảng a có Tmax phần tử.
Với mỗi T[i] thì đưa a[t[i]].

Tổng số bài gửi : 14 Join date : 10/05/2022

Code:: #include <bits/stdc++.h>
using namespace std;

int test = 1,n,dem;

int main()
{
   ios_base::sync_with_stdio(0);
   cin.tie(0);
   freopen("BEAUTY.INP","r",stdin);
   freopen("BEAUTY.OUT","w",stdout);
   while(cin >> n){
   while(1)
   {
   int cnp = test,sum=0,tcc=0;
   while(cnp > 0)
   {
   sum+=cnp%10;
   cnp/=10;
   tcc++;
   }
   if(sum % tcc == 0 )
   {
   dem++;
   if(dem == n)
   {
   cout << test;
   return 0;
   }
   }
   test++;
   }
}
   return 0;
}

Tổng số bài gửi : 19 Join date : 09/05/2022

Code:: #include <iostream>
#include <fstream>
using namespace std;
int rmax,c[10000],a[10000],n=0;;
bool kt(int u)
{
   int t=0,j=0;
   while (u>0)
   {
   if (u<10)
   {
   t=t+(u%10);
   break;
   }
   t=t+(u%10);
   u=u / 10;
   j++;
   }
   j++;
   if (t % j == 0) return true; else return false;
}
void xuli()
{

   ifstream ip("beauty.inp");
   ofstream op("beauty.out");
   rmax=0;;
   while (!ip.eof())
   {
   n++;
   ip >> a[n];
   rmax=max(rmax,a[n]);
   }
   int i=0;
   int j=0;
   while (i<=rmax)
   {
   j++;
   if (kt(j)==true)
   {
   i++;
   c[i]=j;
   }
   }
   for (int i=1;i<=n;i++) op << c[a[i]] << endl ;
}
int main()
{
   xuli();
   return 0;
}

Tổng số bài gửi : 71 Join date : 10/05/2022

Code:: /*Meliodasssf*/

#include<bits/stdc++.h>
using namespace std;
#define forl(i,a,b) for (int i=a; i<=b; i++)
#define forr(i,a,b) for (int i=a; i>=b; i--)
#define max3(a,b,c) max(a,max(b,c))
#define min3(a,b,c) min(a,min(b,c))

int n,test=0,maxx,A[1000001];
int ans[1000001];

void nhap()
{
cin >> n;
forl (i,1,n)
{
cin >> A[i];
maxx = max(maxx,A[i]);
}
}

int sum(int x)
{
int temp=0;
while (x > 0)
{
temp += x%10;
x /= 10;
}
return temp;
}

int num(int x)
{
int temp=0;
while (x>0)
{
temp++;
x /= 10;
}
return temp;
}

int main()
{
ios_base::sync_with_stdio(false); cin.tie(0);
// freopen("in.txt","r",stdin);
// freopen("out.txt","w",stdout);
nhap();

int temp = 0;
while (test < maxx)
{
temp++;
if (sum(temp) % num(temp) == 0)
{
test++;
ans[test] = temp;
}
}

forl (i,1,n) cout << ans[A[i]] << "\n";
return 0;
}

Tổng số bài gửi : 34 Join date : 13/06/2022

Code:: #include <bits/stdc++.h>
using namespace std;

int test = 1,n,dem;

int main()
{
ios_base::sync_with_stdio(0);
cin.tie(0);
freopen("BEAUTY.INP","r",stdin);
freopen("BEAUTY.OUT","w",stdout);
while(cin >> n)
{
while(1)
{
int cnp = test,s=0,t=0;
while(cnp > 0)
{
s+=cnp%10;
cnp/=10;
t++;
}
if(s%t == 0 )
{
dem++;
if(dem == n)
{
cout << test;
return 0;
}
}
test++;
}
}
return 0;
}

» KTLT 9) SỐ ĐẸP 2
» KTLT 6) Tìm ước nguyên tố
» KTLT 7) SỐ NGHỊCH THẾ
» KTLT 10) TÍCH CÁC CHỮ SỐ
» KTLT 5. Tổng 4 số nguyên tố