viết chương trình nhập vào số tự nhiên n và kiểm tra n có phải là số hoàn chỉnh không
viết chương trình nhập vào số tự nhiên n từ bàn phím và kiểm tra n có phải là số hoàn chỉnh không (Số hoàn chỉnh là 1 số có tổng các ước nhỏ hơn nó bằng chính nó).
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.
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.
1) mô tả thuật toán và viết chương trình kiểm tra một số tự nhiên n nhập vào từ bàn phím có phải là số nguyên tố hay không?
Câu 1:
*Mô tả thuật toán:
Bước 1: Nhập n
Bước 2: kt←0; i←2;
Bước 3: Nếu n chia hết cho i thì kt←1;
Bước 4: i←i+1;
Bước 5: Nếu i<=n thì quay lại bước 3
Bước 6: Nếu kt=0 thì n là số nguyên tố
không thì không phải
Bước 7: Kết thúc
*Mô tả thuật toán:
Bước 1: Nhập n
Bước 2: kt←0; i←2;
Bước 3: Nếu n chia hết cho i thì kt←1;
Bước 4: i←i+1;
Bước 5: Nếu i<=n thì quay lại bước 3
Bước 6: Nếu kt=0 thì n là số nguyên tố
không thì không phải
Bước 7: Kết thúc
Câu 1:
uses crt;
var kt,n,i:integer;
begin
clrscr;
write('Nhap n='); readln(n);
kt:=0;
for i:=2 to n-1 do
if n mod i=0 then kt:=1;
if (kt=0) and (n>1) then writeln(n,' la so nguyen to')
else writeln(n,' khong la so nguyen to');
readln;
end.
híc sắp thi rồi giúp em với ạ plsssssssss
câu hỏi gồm 3 câu ạ
câu 1:viết chương trình nhập 1 số tự nhiên N và kiểm tra xem N có là số hoàn hảo không? (số hoàn hảo là số có tổng các ước tự nhiên nhỏ hơn nó bằng chính nó)
câu 2:viết chương trình nhập 1 số nguyên N và kiểm tra xem N có là số nguyên tố không
câu 3: viết chương trình nhập 1 mảng A gồm N số nguyên và xuất ra màn hình số nhỏ nhất trong mảng
viết chương trình nhập số tự nhiên N từ bàn phím , kiểm tra số N đó có phải là số nguyên tố không ?
Uses crt;
var n,i,z: integer;
begin clrscr;
readln(n);
for i:=1 to n do if(n mod i=0) then z:=z+1;
if(z=2) then writeln(z,' la so nguyen to')
else writeln(z,' khong phai la so nguyen to');
readln;
end.
program PrimeNumber;
uses crt;
var
N, i: integer;
isPrime: boolean;
begin
clrscr;
write('Enter N: ');
readln(N);
if N <= 1 then
begin
writeln('N is not a prime number');
end
else
begin
isPrime := true;
for i := 2 to trunc(sqrt(N)) do
begin
if N mod i = 0 then
begin
isPrime := false;
break;
end;
end;
if isPrime then
begin
writeln('N is a prime number');
end
else
begin
writeln('N is not a prime number');
end;
end;
readln;
end.
viết chương trình nhập vào 1 số tự nhiên kiểm tra xem n có phải là số nguyên tố hay khong
#include <bits/stdc++.h>
using namespace std;
bool ktsnt(long long n)
{
long long i;
if(n<2) return false;
else
{
for(i=2;i<=sqrt(n);i++)
if(n%i==0)
return false;
return true;
}
}
long long cnt;
int main(){
ios_base::sync_with_stdio(0);
cin.tie(0); cout.tie(0);
cin>>cnt;
if(ktsnt(cnt)==true)
cout<<"YES";
else
cout<<"NO";
return 0;
}
var i,n,dem:integer;
begin
write('Nhap n = ');readln(n);
for i:=1 to n do
begin
if n mod i = 0 then dem:=dem+1;
end;
if dem = 2 then write(n,' la so nguyen to')
else write(n,' khong la so nguyen to');
readln;
end.
1)viết chương trình xuất ra các bội số của B trong phạm vị từ 1 đến N, với giá trị B, N được nhập vào từ bàn phím
2) nhập số nguyên n, viết chương trình xem số n có phải là số nguyên tố không
3)viết chương trình kiểm tra C có phải số hoàn hảo hay không
2:
#include <bits/stdc++.h>
using namespace std;
int main()
{
int n,i,kt=0;
cin>>n;
for (int i=2; i*i<=n; i++)
if (n%i==0) kt=1;
if (kt==0) cout<<"YES";
else cout<<"NO";
}
Viết chương trình nhập vào số tự nhiên N từ bàn phím. Kiểm tra số đó có chia hết cho 2 hay không?
Thuật toán
INPUT: Số tự nhiên N
OUTPUT: Kết quả kiểm tra số N: ‘là số chia hết cho 2’ hoặc ‘là số không chia hết cho 2’.
Bước 1. Nếu (N chia 2 lấy phần dư) = 0 thì in kết quả ‘là số chia hết cho 2’ ngược lại in kết quả ‘là số không chia hết cho 2’
Bước 2. Kết thúc thuật toán.
thực hiện trên pascal online ạ :((
giúp em với
#include <bits/stdc++.h>
using namespace std;
long long n;
int main()
{
cin>>n;
if (n%2==0) cout<<"YES";
else cout<<"NO";
return 0;
}
NGÔN NGỮ C giúp mk với mk cảm ơn
8.Viết chương trình in ra các số nguyên tố từ 2 đến n, với n nhập từ bàn phím.
9.Viết chương trình kiểm tra xem một số có là số hoàn chỉnh hay không?
10.Nhập tử số và mẫu số của một phân số, in phân số đó dưới dạng tối giản.
uses crt;
var i:integer;
begin
clrscr;
for i:=0 to 9999 do
if trunc(sqrt(i))=sqrt(i) then write(i:4);
readln;
end.
Viết chương trình nhập vào 1 số nguyên N kiểm tra số nguyên đó có phải là số lẻ hay không
python.
N = input(nhap so nguyen N)
if n%2 == 0:
print('N la so chan')
else:
print('N la so le')
#include <bits/stdc++.h>
using namespace std;
long long n;
int main()
{
cin>>n;
if (n%2!=0) cout<<"La so le";
else cout<<"Khong la so le";
return 0;
}