Đưa ví dụ về hợp số có ba chữ số và số nguyên tố có ba chữ số :
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
ML
6 tháng 5 2016
b.dấu hiệu chia hết cho 2 là những số có tận cùng là 0 2 4 6 8
những số chia hết cho 5 là có tận cùng là 0 , 5
những số chia hết cho 3 là có tổng các chữ số chia hết cho 3
những số chia hết cho 9 là có tổng các chữ số chia hết cho 9
những số có tận cùng là 0 thì chia hết cho cả 2 và 5
nhũng số chia hết cho 2 3 5 9 là những số có tận cùng là 0 và có tổng các chữ số chia hết cho 9
NM
1
25 tháng 1 2021
uses crt;
var n,kt,snt,b,m:longint;
{-----------------------------}
procedure nhap(var a:longint);
begin
write('nhap n:'); readln(a);
end;
{-------------------------------------------}
function ktnt(var x:longint):integer;
var kt,i,kt1,j:integer;
begin
kt:=0;
for i:=2 to trunc(sqrt(x)) do
if x mod i=0 then
begin
kt:=1;
break;
end;
if kt=0 then ktnt:=1
else ktnt:=0;
end;
{-----------------------------------------------------}
BEGIN
clrscr;
nhap(n);
for m:=10 to n do
{-----------------------------------------------}
begin
begin
b:=m;
repeat
kt:=ktnt(b);
if kt=0 then break
else b:=b div 10;
until b<10;
if (ktnt(b)=1) and (b>1) then write(m,' ')
end;
end;
{-------------------------------------------------}
readln;
END.