viết thuật toán kiểm tra tính hoàn hảo của 1 số nguyên dương N.
mình cảm ơn ạ ^^
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.
{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.
}
#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;
}
#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<<"Day la so hoan hao";
else cout<<''Day khong la so hoan hao";
return 0;
}
#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<<"Day la so hoan hao";
else cout<<''Day khong la so hoan hao";
return 0;
}
Bài 2:
#include <bits/stdc++.h>
using namespace std;
long long a;
int main()
{
cin>>a;
if (a%2==0) cout<<"la so chan";
else cout<<"La so le";
return 0;
}
Input: Số a
Output: Kiểm tra xem a là số âm hay là số dương
Ý tưởng: Sau khi nhập a, chúng ta sẽ kiểm tra xem nếu a<0 thì a là số âm, nếu a>0 thì a là số dương còn nếu a=0 thì a không là số âm cũng không là số dương
Thuật toán
-Bước 1: Nhập a
-Bước 2: Nếu a<0 thì xuất a là số âm
Nếu a>0 thì a là số dương
Nếu a=0 thì a không là số âm cũng không là số dương
-Bước 3: Kết thúc
Input: số nguyên N
Output: N là chẵn hoặc N là lẻ
- Thuật toán liệt kê:
+ Bước 1: Nhập N
+ Bước 2: Nếu N chia hết cho 2 thì in ra N chẵn và kết thúc thuật toán ngược lại nếu N không chia hết cho 2 thì in ra N lẻ và kết thúc thuật toán
- Thuật toán sơ đồ khối:
Cho biến i chạy từ 1 đến n. Xét i. Nếu nó là số hoàn chỉnh thì in ra.
Program Tim_uoc_2;
uses crt;
Var S, n, i,j: longint;
Begin
clrscr;
Write('Nhap so n ='); readln(n);
For i:=1 to n do
Begin
S:=0;
For j:=1 to i do if i mod j = 0 then S:=S+j;
if S = 2*i then write(i:6,',');
end;
readln
end.
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 do
if i mod j=0 then t:=t+j;
if t=i then write(i:4);
end;
readln;
end.
#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<<"la so hoan hao";
else cout<<"khong la so hoan hao";
return 0;
}