Bài 4. Viết (dịch, chạy) chương trình nhập vào số tự nhiên N từ bàn phím, kiểm tra N có phải là số hoàn chỉnh không và in ra màn hình kết quả kiểm ra. (Một

Question

Bài 4. Viết (dịch, chạy) chương trình nhập vào số tự nhiên N từ bàn phím, kiểm tra N có phải là số hoàn chỉnh không và in ra màn hình kết quả kiểm ra. (Một số có tổng các ước nhỏ hơn nó bằng chính nó được gọi là số hoàn chỉnh. Ví dụ: 6 có các
ước nhỏ hơn nó là 1, 2, 3. Tổng
là 1+2+3=6. Vậy 6 là số hoàn
chỉnh).

ước nhỏ hơn nó là 1, 2, 3. Tổng

là 1+2+3=6. Vậy 6 là số hoàn

chỉnh).

Docthan09 · Answer

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.
#docthan09
chúc bạn 1 buổi tối vv,hc giỏi nha

Daoanhviet96 · Answer

n = int(input('n = '))if (sum([i for i in range(1,n) if n%i==0]) == n):    print('Là số hoàn chỉnh')else:    print('Không là số hoàn chỉnh')
$\$
`\bb\color{green}{	ext{@Daoanhviet96}}`

Hoidap247 - Hỏi Đáp Bài Tập

TRẢ LỜI

Bạn muốn hỏi điều gì?

Tham Gia Group Dành Cho 2K11 Chia Sẻ, Trao Đổi Tài Liệu Miễn Phí

Bạn muốn hỏi điều gì?

Tìm kiếm với hình ảnh

Hãy đăng nhập hoặc tạo tài khoản miễn phí!

Hoidap247 - Hỏi Đáp Bài Tập

Lưu vào

TRẢ LỜI

Bạn muốn hỏi điều gì?

Tham Gia Group Dành Cho 2K11 Chia Sẻ, Trao Đổi Tài Liệu Miễn Phí

Bạn muốn hỏi điều gì?

Lý do báo cáo vi phạm?