tìm các số nguyên tố trong dãy số sau:67,24,686,1287,691
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
D
Ta có sự phân bố electron theo các lớp:
Z = 20 → 2) 8) 8) 2 → có 4 lớp electron.
Z = 22 → 2) 8) 10) 2 → có 4 lớp electron.
Z= 24 → 2) 8) 13) 1 → có 4 lớp electron.
Chú ý: Trường hợp z = 24 (Crom) có cấu hình electron đặc biệt.
C
Các nguyên tố có số hiệu nguyên tử là 5, 13, 31 đều thuộc nhóm IIIA
C
Các nguyên tố có số hiệu nguyên tử là 11, 13, 18 đều thuộc chu kỳ 3
A
Các nguyên tố có số hiệu nguyên tử là 2 và 10 cùng thuộc nhóm VIIIA
dạng liệt kê:
B1: Nhập số nguyên dương N
B2: Nếu N=1, thông báo N ko phải số nguyên tố, kết thúc
B3: Nếu N ∈ (1;4), thông báo N là số nguyên tố, kết thúc
B4: i <-- 2
B5: Nếu i>[√N] thông báo N là số nguyên tố, kết thúc
B6: Nếu N chia hết cho i thì thông báo N ko phải là số nguyên tố, kết thúc
B7: i <-- i+1 rồi quay lại bước 5.
uses crt;
var a:array[1..100]of integer;
i,n,dem,kt,j,t:integer;
begin
clrscr;
readln(n);
for i:=1 to n do
begin
readln(a[i]);
end;
dem:=0;
t:=0;
for i:=1 to n do
if a[i]>1 then
begin
kt:=0;
for j:=2 to trunc(sqrt(a[i])) do
if a[i] mod j=0 then
begin
kt:=1;
break;
end;
if kt=0 then
begin
inc(dem);
t:=t+a[i];
write(a[i]:4);
end;
end;
writeln;
writeln('So luong la:',dem);
writeln('Tong la: ',t);
readln;
end.
uses crt;
var d,n,k,kt1,i,j,x,kt2,u,kt:longint;
st1,st2,st:string;
y:integer;
begin
clrscr;
write('nhap so k='); readln(k);
if k>1 then begin
d:=1;
n:=3;
repeat
repeat
kt:=0;
n:=n+2;
for i:=2 to trunc(sqrt(n)) do
if n mod i=0 then kt:=1;
if kt=0 then str(n,st1);
until kt=0;
{----------------------------------------}
repeat
kt:=0;
n:=n+2;
for j:=2 to trunc(sqrt(n)) do
if n mod j=0 then kt:=1;
if kt=0 then str(n,st2);
until kt=0;
{----------------------------------------}
kt:=0;
st:=st1+st2;
val(st,x,y);
for i:=2 to trunc(sqrt(x)) do
if x mod i=0 then kt:=1;
if kt=0 then d:=d+1;
until d=k;
end;
if k=1 then write('so nguyen to ghep thu ',k,' la 23')
else writeln('so nguyen to ghep thu ',k,' la: ',x);
readln;
end.
#include <bits/stdc++.h>
using namespace std;
long long a[1000],i,n,j;
bool kt;
int main()
{
freopen("nguyento.inp","r",stdin);
freopen("nguyento.out","w",stdout);
cin>>n;
for (i=1; i<=n; i++) cin>>a[i];
for (i=1; i<=n; i++)
if (a[i]>1)
{
kt=true;
for (j=2; j*j<=a[i]; j++)
if (a[i]%j==0) kt=false;
if (kt==true) cout<<a[i]<<" ";
}
return 0;
}
các SNT là: 67;691
67 , 691 nha bạn
học tốt