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.

25 tháng 10 2015

vì tổng các ước của n + n dc họi là số hoàn chỉnh nên:

ta có ước của 6= 1,2,3 mà 1+2+3=6 =) 6 là số hoàn chỉnh

ước của 28 = 1,2,4,7,14 mà 1+2+4+7+14=31 nên 28 ko pải số hoàn chỉnh

đối với số 496 cg giống hệt như trên

 

23 tháng 10 2017

tổng các ước của n bằng n.2

Ư(28)=1;2;4;7;14;28

mà Ko kể chính nó Ta có:1+2+4+7+14=28

=>28 là 1 số hoàn chỉnh

9 tháng 3 2019

Ta có Ư(12) = {1; 2; 3; 4; 6; 12}

1 + 2 + 3 + 4 + 6 = 16

Suy ra số 12 không phải là số hoàn chỉnh

Ta có Ư(28)= {1; 2; 4; 7; 14; 28}

1 + 2 + 4 + 7 + 14 = 28

Suy ra số 28 là số hoàn chỉnh

Ta có: Ư(476) = {1; 2; 4; 7; 14; 17; 28; 34; 68; 119; 238; 476}

1 + 2 + 4 + 7 + 14 + 17+ 28 + 34 + 68 + 119 + 238 = 532

Suy ra số 476 không phải số hoàn chỉnh

28 tháng 6 2021

Ước của 20 là 1 ; 2 ; 4 ; 5 ; 10 

1 + 2 + 4 + 5 + 10 = 22 

Ước của 28 là 1 ; 2 ; 4 ; 7 ; 14 

1 + 2 + 4 + 7 + 14 = 28 

Ước của 45 là 

1 + 3 + 5 + 9 + 15 = 33 

Ước của 128 là 1 ; 2 ; 4 ; 8 ; 16 ; 32 ; 64 

1 + 2 + 4 + 8 + 16 + 32 + 64 = 127 

Vậy 28 là số hoàn chỉnh 

a)

uses crt;

var n,i,t,j:integer;

begin

clrscr;

write('Nhap n='); readln(n);

for i:=1 to n do 

  begin

t:=0;

for j:=1 to i-1 do 

 if i mod j=0 then t:=t+j;

if t=i then write(i:4);

end;

readln;

end.

b)

uses crt;

var gt:real;

i,n:integer;

begin

clrscr;

write('Nhap n='); readln(n);

gt:=1;

for i:=1 to n do 

 gt:=gt*i;

writeln(gt:0:0);

readln;

end.

12 tháng 3 2023

Program HOC24;

var i,t,k,n: integer;

begin

write('Nhap N: '); readln(n);

t:=0; k=0;

while k=0 do

begin

n:=n+1;

for i:=1 to n do if n mod i=0 then t:=t+i;

if t=n then

begin

write(n);

k:=k+1

end else t:=0;

end;

readln

end.

13 tháng 3 2023

Giải cho em bằng chương trình python lớp 10 đc ko ạ

27 tháng 12 2015

n=p.q

mà p;q là các số nguyên tố

=>Ư(n)={1;p;q;n)

=>n=1+p+q=pq

=>1+q=pq-p

=>1+q=p(q-1)

=>2+q-1=p(q-1)

=>p(q-1)-(q-1)=2

=>(p-1)(q-1)=2

2=1.2

=>p-1=1 hoặc p-1=2

p-1=1=>p=2;q-1=2=>p=3

=>n=3+2+1=6

p-1=2=>p=3;q-1=1=>q=2

=>n=3+2+1=6

Vậy n=6

uses crt;

var n,i,t:integer;

begin

clrscr;

write('Nhap n='); readln(n);

t:=0;

for i:=1 to n-1 do 

  if n mod i=0 then t:=t+i;

if t=n then writeln(n,' la so hoan chinh')

else writeln(n,' khong la so hoan chinh');

readln;

end.

6 tháng 11 2021

program hoan_chinh;

uses crt;

var n,i,s:integer;

begin

clrscr;

write('nhap n:');readln(n);

for i:=1 to n-1 do

 begin

 if n mod i = 0 then s:=s+i;

 end;

if s=n then writeln('1') {n là số chính phương thì viết 1}

else writeln('0');{n không là số chính phương thì viết 0}

end.