Chào các bạn! Vì nhiều lý do từ nay Truyen2U chính thức đổi tên là Truyen247.Pro. Mong các bạn tiếp tục ủng hộ truy cập tên miền mới này nhé! Mãi yêu... ♥

c++ cua thinh

#include<iostream.h>

#include<math.h>

int a[100];int b[100];int n;

void nhap()

{cout<<"nhap so n la so phan tu cua mang:";

cin>>n;

cout<<"nhap so phan tu n cua mang

";

for(int i=0;i<=n-1;i++)

cin>>a[i];

}

void sxttd()

{ cout<<"hien thi cac so chan theo abs tang dan

";

for(int i=0;i<=n-2;i++)

for (int j=i+1;j<=n-1;j++)

if (abs(a[i])>abs(a[j]))

{int t;t=a[i];a[i]=a[j];a[j]=t;}

for(i=0;i<=n-1;i++)

if(a[i]%2==0) cout<<a[i]<<' ';cout<<endl;

}

void sxsl()

{cout<<"hien thi cac so le chia het cho 3 theo thu tu giam dan

";

for(int i=0;i<=n-2;i++)

for(int j=i+1;j<=n-1;j++)

if(a[i]<a[j])

{int t=a[i];a[i]=a[j];a[j]=t;}

for(i=0;i<=n-1;i++)

if((a[i]%3==0)&&(a[i]%2!=0))

cout<<a[i]<<' ';cout<<endl;

}

void maxmang()

{int max=a[0];

for(int i=1;i<=n-1;i++)

if(max<a[i]) max=a[i];

cout<<"so lon nhat cua mang la : "<<max<<endl;

}

int ktnt(int a)

{ if(a==1) return 0;

for (int i=2;i<=sqrt(a);i++)

if(a%i==0) return 0;

return 1;

}

void dttlk()

{float d=0,s=0;

cout<<"cac so nguyen to trong mang la :

";

for(int i=0;i<n-1;i++)

if(ktnt(a[i])){d++;s=s+a[i];cout<<a[i]<<' ';}

cout<<"

trong mang co "<<d<<" so nguyen to";

cout<<"

tong cac so nguyen to la : "<<s<<endl;

}

void tbc()

{float s=0;

for(int i=0;i<=n-1;i++)s=s+a[i];

cout<<"tbc cua cac so trong mang la: "<<s/n<<endl;

}

int kthh(int a)

{float s=0;

if (a==0)  return 0;

for(int i=1;i<=a/2;i++)

if(a%i==0) s=s+i;

if (a==s) return 1;else return 0;

}

void shh()

{

int i,j=0,d=0,max;

for(i=0;i<n-1;i++)if(kthh(a[i])) {d++;b[j]=a[i];j++;}

if(d!=0)

{

max=b[0];for(i=0;i<=n-1;i++) if (max<b[i]) max=b[i];

cout<<"so hoan hao lon nhat trong mang la: "<<max;

}

else cout<<"khong co so hoan hao trong mang ";

}

void main ()

{nhap();

sxttd();

sxsl();

maxmang();

dttlk();

tbc();

shh();

}

Bạn đang đọc truyện trên: Truyen247.Pro

Tags: