Viết CT nhập số m và n là hai số ae , biết m và n là 2 số ae nếu tổng các ước của m và n trừ 1 và chính nó bằng nhau.
Vd : 6 và 25 , có tổng ước trừ 1 và chính nó đều bằng 5
a) Số nguyên a được gọi là số hoàn thiện khi và chỉ khi tổng các ước dương của a (trừ ước a) bằng chính nó. Ví dụ 6 là số hoàn chỉnh vì 6 có các ước là 1,2,3 và tổng các ước là 1+2+3=6. Viết trương chình nhập vào số dương n từ bàn phím (0≤ n ≤ 1000). In lên màn hình tất cả các số hoàn chỉnh dương nhỏ hơn hoặc bằng n.
b)Trong toán học n! (đọc là giai thừa) dược định nghĩa như sau:
Qui ước: 0!=1
n!=1.2.3...n
Vd: 4!=1.2.3.4=24
Viết trương trình nhập từ bàn phím số nguyên n (0≤ n ≤ 20). Tính và in lên màn hình n!
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.
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. Viết chương trình tính tổng các số nguyên tố từ 1 đến 100 2.Số nguyên dương P được gọi là ước thực sự của số nguyên n nếu n chia hết cho P và P khác 1 và khadc chính số n . Viết thuật toán và chương trình nhập số tự nhiên n và tính tổng của nó
1:
uses crt;
var i,j,t,kt:integer;
begin
clrscr;
t:=0;
for i:=1 to 100 do
if i>1 then
begin
kt:=0;
for j:=2 to i-1 do
if i mod j=0 then kt:=1;
if kt=0 then t:=t+i;
end;
writeln(t);
readln;
end.
Câu 2:
*Viết chương trình:
uses crt;
var n,p,t:integer;
begin
clrscr;
write('Nhap n='); readln(n);
t:=0;
for p:=2 to n-1 do
if n mod p=0 then t:=t+p;
writeln('Tong cac uoc that su cua ',n,' la: ',t);
readln;
end.
Dễ mà bạn tự làm đi
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
1. tìm số tự nhiên n có hai chữ số, biết rằng 2n+1 và 3n+1 đều là các số chính phương.
2.tìm số tự nhiên có hai chữ số, biết rằng nếu nhân nó với 45 thì được một số chính phương.
3.a) Các số tự nhiên n và 2n có tổng các các chữ số bằng nhau. Chứng minh rằng n chia hết cho 9.
b)* tìm số chính phương n cá ba chữ số, biết rằng n chia hết cho 5 và nếu nhân n với 2 thì tổng các chữ số của nó không đổi.
3.a)n và 2n có tổng các chữ số bằng nhau => hiệu của chúng chia hết cho 9
mà 2n-n=n=>n chia hết cho 9 => đpcm
Một số có tổng các ước nhỏ hơn nó mà bằng chính nó được gọi là số hoàn chỉnh. (Số 6 có các ước nhỏ hơn nó là 1, 2, 3. Tổng các ước số: 1 + 2 + 3 = 6. Nên 6 được gọi là số hoàn chỉnh). Viết chương trình C++ nhập một dãy số nguyên gồm có N phần tử. N là một số nguyên được nhập từ bàn phím (0
Số hoàn hảo là số mà tổng các ước của nó bằng 2 lần chính nó.
Ví dụ: 6 là số hoàn hảo vì 6 có tổng ước là 1+2+3+6=12=2 lần 61+2+3+6=12=2 lần số là số hoàn hảo vì 6
1
Yêu cầu: Viết chương trình nhập vào số nguyên n. In ra chữ YES nếu n là số hoàn hảo, ngược lại ghi chữ NO
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.
1.Tìm số tự nhiên có 2 chữ số biết rằng lấy tổng các chữ số của nó cộng với tích các chữ số của nó thì bằng chính nó.
2.Tìm số tự nhiên có 3 chữ số biết rằng số đó gấp 11 lần tổng các chữ số của nó.
3.Hiệu 2 số là 57. Số bị trừ có chữ số hàng đơn vị là 3. Nếu gạch bỏ chữ số hàng đơn vị của số bị trừ thì ta được số trừ. Tìm số bị trừ và số trừ.
1.19
2.198
3.SBT: 63, ST: 6
Số 12, chẳng hạn, có sáu ước số gồm 1, 2, 3, 4, 6, và 12. Nếu N là một số
nguyên dương có đúng 16 ước số (kể cả 1 và chính nó), hỏi giá trị nhỏ nhất
của N bằng bao nhiêu?