một số được gọi là siêu nguyên tố khi nó bớt đi một chữ số sau cùng mà nó vẫn là số nguyên tố. nếu bớt một lần thì gọi là siêu nguyên tố cấp 1, nếu bớt hai lần thì gọi là siêu nguyên tố cấp độ 2, nếu...

NN

Nguyễn Ngọc Thiên Trang

25 tháng 5 2017

một số được gọi là siêu nguyên tố khi nó bớt đi một chữ số sau cùng mà nó vẫn là số nguyên tố. nếu bớt một lần thì gọi là siêu nguyên tố cấp 1, nếu bớt hai lần thì gọi là siêu nguyên tố cấp độ 2, nếu bớt ba lần thì gọi là siêu nguyên tố cấp độ 3,.. hãy viết chương trình tìm các siêu nguyên tố cấp độ 2 của n số tự nhiên (với n<=10000) và in ra file xuat.txt help me! giúp mk vs!...

Đọc tiếp

#Tin học lớp 11

1

MH

Minh Hoàng

29 tháng 5 2017

function NT(n: integer): boolean;
var i: integer;
begin
NT:=true;
for i:=2 to n-1 do
if n mod i = 0 then NT:=false;
end;
var i: integer;
begin
write('Cac so sieu nguyen to cap do 2: ');
for i:=100 to 10000 do
if (NT(i) and NT(i div 10) and NT(i div 100)) then write(i:6);
readln
end.

Đúng(0)

NN

Nguyễn Ngọc Thiên Trang

1 tháng 6 2017

phần xử lý à?

Đúng(0)

Z

zzzzz

5 tháng 11 2023

Một số được gọi là siêu nguyên tố nếu nó là số nguyên tố và có thể biểu diễn được thành tổng của hai số nguyên tố khác”. Ví dụ: 5 là số siêu nguyên tố vì 5 = 2 + 3.Cho số nguyên dương . Hỏi có bao nhiêu số siu nguyên tố không vượt quá...

Đọc tiếp

#Tin học lớp 12

0

QC

Quỳnh Chi Nguyễn

25 tháng 1 2021

Số siêu nguyên tố là số nguyên tố mà khi bỏ một số tùy ý các chữ số bên phải của nó thì phần còn lại vẫn tạo thành một số nguyên tố. Ví dụ 7331 là một số siêu nguyên tố có 4 chữ số vì 733, 73,7 cũng là các số nguyên tố Viết chương trình nhập dữ liệu vào là một số nguyên N (10<N<=10^5) và đưa ra kết quả các số siêu nguyên tố nhỏ hơn N ...

Đọc tiếp

#Tin học lớp 8

1

NL

Nguyễn Lê Phước Thịnh

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

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;

{-------------------------------------------------}

readln;

END.

Đúng(2)

NT

Ngô Thị Tân

11 tháng 12 2023

Số siêu nguyên tố là số nguyên tố mà khi bỏ 1 số tùy ý các chứ số bên phải của nó thì phần còn lại vẫn tạo thành một số nguyên tố.Ví dụ 7331 là một số siêu nguyên tố có 4 chữ số vì 733, 73, 7 cũng là các số nguyên tố. Dữ liệu: Vào từ tệp văn bản SNT.INPGhi giá trị của N (số chữ số của các số siêu nguyên tố). Kết quả: Ghi ra tệp văn bản SNT.OUT- Ghi các số siêu nguyên tố có N chữ số.- Số lượng các...

Đọc tiếp

#Tin học lớp 8

1

NH

Nguyễn Hoàng Duy

12 tháng 12 2023

Pascal hay C++

Đúng(0)

NV

Nguyễn Văn Tiến Dũng

13 tháng 8 2023

Tại Vương quốc Byte xinh đẹp, mỗi người luôn chọn cho mình một con số, theo họ số nguyên tố là số mang lại sự may mắn và ai tìm được một số siêu nguyên tố còn may mắn hơn nữa. Số siêu nguyên tố là một số nguyên tố mà khi bỏ 1 số tùy ý các chữ số bên phải của nó thì phần còn lại vẫn là 1 số nguyên tố. Số 2333 là 1 số siêu nguyên tố vì 2333 là một số nguyên tố và 233, 23, 2 cũng là các số nguyên...

Đọc tiếp

#Tin học lớp 8

2

PS

Phía sau một cô gái

13 tháng 8 2023

program KiemTraSoSieuNguyenTo;

uses crt;

function IsPrime(num: integer): boolean;

var

i: integer;

begin

if num < 2 then

IsPrime := false

else

begin

IsPrime := true;

for i := 2 to trunc(sqrt(num)) do

begin

if num mod i = 0 then

begin

IsPrime := false;

break;

end;

function IsSuperPrime(num: integer): boolean;

var

i, temp: integer;

begin

IsSuperPrime := true;

while num > 0 do

begin

if not IsPrime(num) then

begin

IsSuperPrime := false;

break;

end;

temp := num mod 10;

num := num div 10;

end;

var

n: integer;

inputFile, outputFile: text;

begin

assign(inputFile, 'SNT.INP');

assign(outputFile, 'SNT.OUT');

reset(inputFile);

rewrite(outputFile);

readln(inputFile, n);

if IsSuperPrime(n) then

writeln(outputFile, 1)

else

writeln(outputFile, 0);

close(inputFile);

close(outputFile);

end.

Đúng(1)

NV

Nguyễn Văn Tiến Dũng

13 tháng 8 2023

bạn viết tới phần mình chưa học á.bạn viết lại đơn giản hơn được không

Đúng(0)

PT

Pham Trong Bach

31 tháng 7 2019

Số nguyên tố dạng Mp = 2P - 1, trong đó p là một số nguyên tố được gọi là số nguyên tố Mecxen. Số M6972593 được phát hiện năm 1999. Hỏi rằng nếu viết số đó trong hệ thập phân thì có bao nhiêu chữ số? A. 2098960 chữ số. B. 2098961 chữ số C. 6972593 chữ số D. 6972592 chữ...

Đọc tiếp

#Toán lớp 12

1

CM

Cao Minh Tâm

31 tháng 7 2019

Đáp án A

Ta có

Do đó số chữ số của số đó là 2098959 + 1 = 2098960

Đúng(0)

PT

Pham Trong Bach

19 tháng 10 2019

Số nguyên tố dạng M p = 2 P − 1 , trong đó p là một số nguyên tố được gọi là số nguyên tố Mecxen. Số M 6972593 được phát hiện năm 1999. Hỏi rằng nếu viết số đó trong hệ thập phân thì có bao nhiêu chữ số? A. 2098960 chữ số B. 2098961 chữ số C. 6972593 chữ số D. 6972592 chữ...

Đọc tiếp

#Mẫu giáo

1

CM

Cao Minh Tâm

19 tháng 10 2019

Đáp án A

Ta có

log M 6972593 = log 2 6972593 − 1 ≈ log 2 6972593 = log 2 log 2 10 6972593 log 2 10 = 6972593 log 2 10 = 2098959 , 641

Do đó số chữ số của số đó là

2098959 + 1 = 2098960

Đúng(0)

NT

Nguyễn Thu Hà

10 tháng 12 2020

Mọi người giúp em vs ạ Số nguyên tố là số chỉ có đúng 2 ước là 1 và chính nó. Số đảo ngược của một số là viết các chữ số của số đó theo thứ tự ngược lại. Số n được gọi là số song nguyên tố nếu n là số nguyên tố và số đảo ngược của n cũng là số nguyên tố. Yêu cầu: Viết chương trình in ra những số song nguyên tố trong một dãy số. Dữ liệu vào: Nhập từ bàn phím số nguyên dương n...

Đọc tiếp

#Tin học lớp 11

1

NL

Nguyễn Lê Phước Thịnh

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.

Đúng(1)

NT

Nguyễn Thu Hà

10 tháng 12 2020

Mọi người giúp em vs ạ Số nguyên tố là số chỉ có đúng 2 ước là 1 và chính nó. Số đảo ngược của một số là viết các chữ số của số đó theo thứ tự ngược lại. Số n được gọi là số song nguyên tố nếu n là số nguyên tố và số đảo ngược của n cũng là số nguyên tố. Yêu cầu: Viết chương trình in ra những số song nguyên tố trong một dãy số. Dữ liệu vào: Nhập từ bàn phím số nguyên dương n...

Đọc tiếp

#Tin học lớp 11

1

NL

Nguyễn Lê Phước Thịnh

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.

Đúng(1)

NH

Nguyễn Hoàng Nam

10 tháng 3 2017

Câu nào đúng, câu nào sai trong các câu sau đây: A. Sự oxi hóa một nguyên tố là lấy bớt electron của nguyên tố đó, là làm cho số oxi hóa của nguyên tố đó tăng lên. B. Chất oxi hóa là chất thu electron, là chất chứa nguyên tố mà số oxi hóa của nó tăng sau phản ứng. C. Sự khử một nguyên tố là sự thu thêm electron cho nguyên tố đó, làm cho số oxi hóa của nguyên tố đó giảm xuống. D. Chất khử...

Đọc tiếp

#Hóa học lớp 10

1