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.

29 tháng 7 2021

18 nha

29 tháng 7 2021

bạn ơi 18 nha

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.

5 tháng 11 2016

Ư(12)={1,2,3,4,6,12} 

1+2+3+4+6=16       vay 12 khong phai la so hoan chinh

Ư(28)= {1,2,4,7,14,28}

1+2+4+7+14=28     vay 28 la so hoan chinh

Ư(496)= {1,2,4,8,16,31,62,124,248,490}

1+2+4+8+16+31+62+124+248=496

 K CHO MINH NHAAAAAAA

16 tháng 3 2017

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

Vì 1 + 2 + 3 + 4 + 6 = 16 Vậy  12  ko là số hoàn chỉnh

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

1+ 2 + 4 + 7 + 28 = 28 Vậy  28  là số hoàn chỉnh

Ư(496)={ 1 ; 2 ; 4 ; 8 ; 16 ; 31 ; 62 ; 124 ; 248 ; 496 }

Cộng lại vẫn bằng kết quả đó nên  496 là số hoàn chỉnh

Tk mk mk tk lại

18 tháng 5 2017

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

Vì 1+2+3+4+6 = 16 Vậy 12 không là số hoàn chỉnh.

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

Vì 1+2+4+7+14 = 28 Vậy 28 là số hoàn chỉnh .

Ư(496) ={ 1;2;4;8;16 ;31;62;124;248;496}

Vì 1+2+4+8+16+31+62+124+248=496 Vậy 496 là số hoàn chỉnh.

25 tháng 10 2017

12 có các ước không kể chính nó là :

1; 2; 3; 4; 6

Ta thấy 1 + 2 + 3 + 4 + 6 \(\ne\) 12. Vậy 12 không là số hoàn chỉnh.

Còn 28 và 496 là số hoàn chỉnh.

uses crt;

var i,n,t,j,kt:integer;

begin

clrscr;

readln(n);

t:=0;

for i:=2 to n do

if n mod i=0 then

begin

kt:=0;

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

if i mod j=0 then kt:=1;

if kt=0 then t:=t+i;

end;

write(t);

readln;

end.

29 tháng 8 2023

cảm ơn bn đã giúp mik nhiều bn thông cảm

19 tháng 10 2018

a = 23 . 52 . 11

a chia hết cho 4 => 4 thuộc Ư(a)

a chia hết cho 8 => 8 thuộc Ư(a)

a ko chia hết cho 16 => 16 ko thuộc Ư(a)

a chia hết cho 11 => 11 thuộc Ư(a)

a chia hết cho 20 => 20 thuộc Ư(a)

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 

22 tháng 7 2023

program so_hoan_hao;

var

       n, tong_uoc, i: integer;

begin

       writeln('Nhap vao mot so nguyen duong n:');

       readln(n);

       tong_uoc := 0;

       for i := 1 to n-1 do

       begin

              if n mod i = 0 then

                     tong_uoc := tong_uoc + i;

       end;

       if tong_uoc = n then

              writeln('YES')

       else

              writeln('NO');

end.