Răspuns:
#include<iostream>
using namespace std;
int n,i,v[100],par,d,nr=0,prim,s=0,perf=0,a,b,interval,ok1=0,ok2=0;
int main()
{cout<<"Lungimea vectorului este:";
cin>>n;
cout<<"Cititi vectorul!"<<endl;
for(i=1;i<=n;i++)
cin>>v[i];
for(i=1;i<=n;i++)
if(v[i]%2!=0) par++;
if(par==0) cout<<"Toate elementele vectorului sunt pare."<<endl;
else cout<<"Nu toate elementele vectorului sunt pare."<<endl;
for(i=1;i<=n;i++)
{for(d=2;d<=v[i]/2;d++)
if(v[i]%d==0) nr++;
if(nr==0) prim++;}
if(prim==n) cout<<"Toate elementele din vector sunt prime."<<endl;
else cout<<"Nu toate elementele din vector sunt prime."<<endl;
for(i=1;i<=n;i++)
{for(d=2;d<=v[i]/2;d++)
if(v[i]%d==0) s=s+v[i];
if(s==v[i]) perf++;}
if(perf==n) cout<<"Toate elementele din vector sunt perfecte."<<endl;
else cout<<"Nu toate elementele din vector sunt perfecte."<<endl;
cout<<"Capatul inferior al intervalului este:";
cin>>a;
cout<<endl;
cout<<"Capatul superior al intervalului este:";
cin>>b;
cout<<endl;
for(i=1;i<=n;i++)
if(v[i]>a&&v[i]<b) interval++;
if(interval==n) cout<<"Toate numerele apartin intervalului ("<<a<<","<<b<<")."<<endl;
else cout<<"Nu toate numerele apartin intervalului ("<<a<<","<<b<<")."<<endl;
for(i=1;i<=n;i++)
if(v[i]>v[i+1]) ok1=1;
if(ok1==0) cout<<"Elementele vectorului sunt ordonate crescator."<<endl;
else cout<<"Elementele vectorului nu sunt ordonate crescator."<<endl;
for(i=1;i<=n;i++)
if(v[i]<v[i+1]) ok2=1;
if(ok2==0) cout<<"Elementele vectorului sunt ordonate descrescator.";
else cout<<"Elementele vectorului nu sunt ordonate descrescator.";
return 0;
}
