a,Cho p là số ng/tố(p>3) và 2p+1 cũng là số ng/tố.CMR:4p+1 là số ng/tố
b,một số tự nhiên có 4 chữ số giống nhau chỉ có 2 ước đều là số ng/tố,Tìm 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
VT
7
21 tháng 7 2015
Để A có 4 chữ số giống nhau từ nhỏ nhất trở lên có 1111, 2222, 3333. Dễ dàng
loại trừ 2222 , 3333…và chọn 1111 Vì 1111 = 11 x 101 (đều là số nguyên tố)
Đáp sô 1111 có ước nguyên tố là 11 và 101
LC
21 tháng 7 2015
Gọi số cần tìm là aaaa.
Ta có: aaaa=1111.a=a.11.101
Vì 11 và 101 là các ước nguyên tố.
=> a không phải là số nguyên tố.
=> a khác 2,3,5,7
=> a=1,4,6,8,9(a khác 0)
Vậy các số cần tìm là 1111,4444,6666,8888,9999.
NH
1
HN
1
LA
10 tháng 9 2015
Để A có 4 chữ số giống nhau từ nhỏ nhất trở lên có 1111, 2222, 3333
loại trừ 2222 , 3333…và chọn 1111 Vì 1111 = 11 x 101 (đều là số nguyên tố)
Đáp sô 1111 có ước nguyên tố là 11 và 101
10 tháng 12 2020
uses crt; var a,b:array[1..100000]of integer; i,n,kt,j,dem,x,y,kt1:integer; st,st1:string; begin clrscr; write('Nhap n='); readln(n); for i:=1 to n do begin write('A[',i,']='); readln(a[i]); end; dem:=0; for i:=1 to n do if a[i]>1 then begin kt:=0; for j:=2 to a[i]-1 do if a[i] mod j=0 then begin kt:=1; break; end; if kt=0 then begin inc(dem); b[dem]:=a[i]; end; end; for i:=1 to dem do begin str(a[i],st); st1:=''; for j:=length(st) downto 1 do st1:=st1+st[j]; val(st1,x,y); kt1:=0; for j:=2 to x-1 do if x mod j=0 then begin kt1:=1; break; end; if kt1=0 then write(a[i]:4); end; readln; end.
10 tháng 12 2020
uses crt; var a,b:array[1..100000]of integer; i,n,kt,j,dem,x,y,kt1:integer; st,st1:string; begin clrscr; write('Nhap n='); readln(n); for i:=1 to n do begin write('A[',i,']='); readln(a[i]); end; dem:=0; for i:=1 to n do if a[i]>1 then begin kt:=0; for j:=2 to a[i]-1 do if a[i] mod j=0 then begin kt:=1; break; end; if kt=0 then begin inc(dem); b[dem]:=a[i]; end; end; for i:=1 to dem do begin str(a[i],st); st1:=''; for j:=length(st) downto 1 do st1:=st1+st[j]; val(st1,x,y); kt1:=0; for j:=2 to x-1 do if x mod j=0 then begin kt1:=1; break; end; if kt1=0 then write(a[i]:4); end; readln; end.
HN
1