+Viết các nguyên tố nhỏ hơn 20
K
Khách
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.
Những câu hỏi liên quan
CM
13 tháng 12 2018
a) Tập các số nguyên tố nhỏ hơn 30 là: 2 , 3 , 5 , 7 , 11 , 13 , 17 , 19 , 23 , 29
b) Tập các ước của 30 là: 1 , 2 , 3 , 5 , 6 , 10 , 15 , 30
c) Tập các số cần tìm là: 24 , 36 , 48 , 60 , 72 , 84 , 96
24 tháng 10 2021
a) Viết tập hợp các số nguyên tố nhỏ hơn 30.
{2;3;5;7;11;13;17;19;23;29}
b) Viết tập hợp các ước của 30.
{1;2;3;5;6;10;15;30}
c) Viết tập hợp các bội lớn hơn 20 và nhỏ hơn 100 của 12
{24;36;48;60;72;84;96}
HỌC TỐT
HN
2
1 tháng 12 2019
Cách 1 : A = { x là số nguyên tố | x < 20 }
Cách 2: Liệt kê. A = { 2; 3; 5; 7; 11; 13; 17; 19 }
VD
2
NT
2
LH
0
6 tháng 3 2016
Có bao nhiêu số nguyên tố nhỏ hơn 20
Có 8 số nguyên tố nhỏ hơn 20
AP
28 tháng 8 2021
uses crt;
var n,i,o,d:integer;
function ktnt(n:integer): integer;
var i,d:integer;
begin
d:=0;
for i:=1 to sqrt(n) do
if (n mod i=0) then d:=d+1;
if d=2 then ktnt=0
else ktnt=1;
end;
begin
readln(n);
writeln(' so nguyen to be hon hoac bang n la'); {a}
for i:=1 to n do
if ktnt(i)=0 then writeln(i);
writeln('so nguyen to nho nhat khong be hon n');
o:=n;
while o>0 do
begin
if ktnt(o)=0 then
begin
write(o);
break;
end;
o:=o+1;
end;
writeln('cặp số nguyên tố là hai số nguyên lẻ liên tiếp nhỏ hơn hoặc bằng n');
o:=0;
o:=1;
d:=0;
for i:=o+2 to n do
begin
if ktnt(i)=0 then
begin
d:=d+1;
write(i,' ');
if d<2 then continue;
end;
d:=0;
writeln;
end;
readln;
end.
NQ
Nguyễn Quốc Đạt
CTVVIP
7 tháng 1 2024
function nt(x: integer): boolean;
var j: integer;
begin
nt:=true;
if (x=2) or (x=3) then exit;
nt:=false;
if (x=1) or (x mod 2=0) or (x mod 3=0) then exit;
j:=5;
while j<=trunc(sqrt(x)) do
begin
if (x mod j=0) or (x mod (j+2)=0) then exit;
j:=j+6;
end;
nt:=true;
end;
Nhỏ hơn 200 nha mn ghi mà nó cứ 20 hoài