viết chương trình nhập dãy số nguyên dương. In ra tổng của các số vừa nhập, đếm và tính tổng các số nguyên tố có trong dãy số nguyên
viết chương trình nhập dãy số nguyên dương. In ra tổng của các số vừa nhập, đếm và tính tổng các số nguyên tố có trong dãy số nguyên
uses crt;
var n,i,d,s,s1:longint; a:array[1..1000000]of longint;
function nt(a:longint):boolean;
var i:longint;
begin
i:=2;
while(a>1)and(a mod i<>0)do inc(i);
nt:=i=a;
end;
begin
clrscr;
readln(n);
for i:=1 to n do
begin
read(a[i]);
inc(s,a[i]);
end;
writeln(‘Tong: ‘,s);
for i:=1 to n do
if nt(a[i]) then
begin
inc(d);
inc(s1,a[i]);
end;
writeln(‘Co ‘,d,’ so nguyen to’);
writeln(‘Tong so nguyen to: ‘,s1);
readln
end.
#include<bits/stdc++.h>
#define nmax 10000006
using namespace std;
bool NT[nmax + 1];
void QC()
{
freopen(“cc.inp”,”r”,stdin);
freopen(“cc.out”,”w”,stdout);
ios::sync_with_stdio(0);
cin.tie(0); cout.tie(0);
}
void sang()
{
for(int i=0;i<=nmax;i++)
NT[i]=true;
NT[1]=false;
NT[0]=false;
for(int i=2;i*i<=nmax;i++)
{
if(NT[i]==true);
{
for(int j=i*i;j<=nmax;j+=i)
NT[j]=false;
}
}
}
long long s=0,ans =0 , dem=0;
int main()
{
sang();
QC();
int n;
while(cin>>n)
{
s+=n;
if(NT[n])
{
dem++;
ans=ans+n;
}
}
cout<<s<<‘ ‘<<dem<<‘ ‘<<ans;
}