Những câu hỏi liên quan
Đỗ Trọng TÍn
Xem chi tiết
Phạm Thanh Thảo
Xem chi tiết
Phạm Khánh Nam
11 tháng 8 2021 lúc 9:38

+) Các ước của 10 (không kể chính nó) là 1; 2; 5 và 1 + 2 + 5 = 8 ≠ 10 nên 10 không là số hoàn hảo.

+) Các ước của 28 (không kể chính nó) là: 1; 2; 4; 7; 14 và 1 + 2 + 4 + 7 + 14 = 28 nên 28 là số hoàn hảo.

+) Các ước của 496 (không kể chính nó) là 1; 2; 4; 8; 16; 31; 62; 124; 248 và 1 + 2 + 4 + 8 + 16 + 31 + 62 + 124 + 248 = 496 nên 496 là số hoàn hảo.

Vậy trong các số trên có 28 và 496 là số hoàn hảo.

 

 

Bình luận (0)
Đức Thắng
Xem chi tiết
Phía sau một cô gái
22 tháng 7 2023 lúc 19:56

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.

Bình luận (0)
havy
Xem chi tiết
Nguyễn Lê Phước Thịnh
31 tháng 10 2021 lúc 0:50

#include <bits/stdc++.h>
using namespace std;
long long n,i,x,t,dem;
//chuongtrinhcon
bool kthh(long long n)
{
    if (n<=1) return(false);
    else
    long long t=0;
    for (long long i=1; i<=n/2;i++)
        if (n%i==0) t=t+i;
    if (t==n) return(true);
    else return(false);
}
//chuongtrinhchinh
int main()
{
    freopen("hoanhao.inp","r",stdin);
    freopen("hoanhao.out","w",stdout);
    cin>>n;
    t=0;
    dem=0;
    for (i=1; i<=n; i++)
    {
        cin>>x;
        if (kthh(x)==true)
        {
            dem++;
            t=t+x;
        }
    }
    cout<<dem<<endl;
    cout<<t;
    return 0;
}

 

Bình luận (0)
Quyên Lệ
Xem chi tiết
Nguyễn Lê Phước Thịnh
13 tháng 3 2022 lúc 11:14

uses crt;

var n,i,t,j:integer;

begin

clrscr;

readln(n);

for i:=1 to n do 

  begin

t:=0;

for j:=1 to i div 2 do 

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

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

end;

readln;

end.

Bình luận (0)
Quang Sỹ Trần
Xem chi tiết
Nguyễn Thế Vinh
Xem chi tiết

+) Các ước của 10 (không kể chính nó) là 1; 2; 5 và 1 + 2 + 5 = 8 ≠ 10 nên 10 không là số hoàn hảo.

+) Các ước của 28 (không kể chính nó) là: 1; 2; 4; 7; 14 và 1 + 2 + 4 + 7 + 14 = 28 nên 28 là số hoàn hảo.

+) Các ước của 496 (không kể chính nó) là 1; 2; 4; 8; 16; 31; 62; 124; 248 và 1 + 2 + 4 + 8 + 16 + 31 + 62 + 124 + 248 = 496 nên 496 là số hoàn hảo.

Vậy trong các số trên có 28 và 496 là số hoàn hảo.

Bình luận (0)
 Khách vãng lai đã xóa
Cao Tùng Lâm
4 tháng 10 2021 lúc 17:50

+) Các ước của 10 (không kể chính nó) là 1; 2; 5 và 1 + 2 + 5 = 8 ≠ 10 nên 10 không là số hoàn hảo.

+) Các ước của 28 (không kể chính nó) là: 1; 2; 4; 7; 14 và 1 + 2 + 4 + 7 + 14 = 28 nên 28 là số hoàn hảo.

+) Các ước của 496 (không kể chính nó) là 1; 2; 4; 8; 16; 31; 62; 124; 248 và 1 + 2 + 4 + 8 + 16 + 31 + 62 + 124 + 248 = 496 nên 496 là số hoàn hảo.

Vậy trong các số trên có 28 và 496 là số hoàn hảo.

Bình luận (0)
 Khách vãng lai đã xóa
minh
Xem chi tiết
Minh Ngọc
Xem chi tiết
Đỗ Tuệ Lâm
17 tháng 2 2022 lúc 13:58

{PROGRAM bai_tap;
USES crt ;
VAR i , n, 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 write(n,' la so hoan chinh');
  else Writeln(n,' Khong la so hoan chinh');
  Readlnnline Pascal Compiler.
begin    
  End,
Readlnnline
END.

}

Bình luận (0)
Nguyễn Lê Phước Thịnh
18 tháng 2 2022 lúc 0:08

#include <bits/stdc++.h>

using namespace std;

long long n,i,t;

int main()

{

cin>>n;

t=0;

for (i=1; i<=n/2; i++) 

if (n%i==0) t=t+i;

if (t==n) cout<<"YES";

else cout<<"NO";

return 0;

}

Bình luận (0)