uses crt;

var i,n,t,j,kt:integer;

begin

clrscr;

readln(n);

t:=0;

for i:=2 to n do

if n mod i=0 then

begin

kt:=0;

for j:=2 to trunc(sqrt(i)) do

if i mod j=0 then kt:=1;

if kt=0 then t:=t+i;

end;

write(t);

readln;

end.

Dưới đây là một ví dụ về chương trình Pascal để tính tổng các ước số nguyên tố của một số tự nhiên n:

```pascal
program TinhTongUocSoNguyenTo;
var
n, i, j, sum: integer;
isPrime: boolean;
begin
write('Nhap vao so tu nhien n: ');
readln(n);

sum := 0;

for i := 1 to n do
begin
if n mod i = 0 then // Kiểm tra i có là ước số của n không
begin
isPrime := true;

for j := 2 to trunc(sqrt(i)) do // Kiểm tra i có phải là số nguyên tố không begin if i mod j = 0 then begin isPrime := false; break; end; end; if isPrime then // Nếu i là số nguyên tố, cộng vào tổng sum := sum + i; end;

end;

writeln('Tong cac uoc so nguyen to cua ', n, ' la: ', sum);
end.
```

Chương trình trên sẽ yêu cầu bạn nhập vào số tự nhiên n, sau đó tính tổng các ước số nguyên tố của n và hiển thị kết quả.

Ta có:
B = 2^x . 3^y

B² = 2^2x . 3^2y

=> số ước của B² là (2x + 1).(2y + 1) = 15

+ Nếu x > y thì 2x + 1 = 5; 2y + 1 = 3

=> x = 2; y = 1

=> số ước của B³ là (3.2 + 1).(3.1 + 1) = 40 (ước)

+ Nếu x < y thì 2x + 1 = 3; 2y + 1 = 5

=> x = 1; y = 2

=> số ước của B³ là (3.1 + 1).(3.2 + 1) = 40 (ước)

Vậy B³ có 40 ước

Chú ý: ta loại trường hợp: 2x + 1 = 15; 2y + 1 = 1 hoặc ngược lại vì khi đó 1 trong 2 số x hoặc y = 0, không đúng với đề bài là x; y là các số tự nhiên khác 0

Ta có:
B = 2^x . 3^y

B² = 2^2x . 3^2y

=> số ước của B² là (2x + 1).(2y + 1) = 15

+ Nếu x > y thì 2x + 1 = 5; 2y + 1 = 3

=> x = 2; y = 1

=> số ước của B³ là (3.2 + 1).(3.1 + 1) = 40 (ước)

+ Nếu x < y thì 2x + 1 = 3; 2y + 1 = 5

=> x = 1; y = 2

=> số ước của B³ là (3.1 + 1).(3.2 + 1) = 40 (ước)

Vậy B³ có 40 ước

Chú ý: ta loại trường hợp: 2x + 1 = 15; 2y + 1 = 1 hoặc ngược lại vì khi đó 1 trong 2 số x hoặc y = 0, không đúng với đề bài là x; y là các số tự nhiên khác 0

2:

a: 7;49

b: 30;60;90;120

Sai hết!Câu trả lời là 8 ước.Bạn nhớ tick mình nha,cái này mình làm đúng 100%.

2: 

x+xy+y=4

=>x(y+1)+y+1=5

=>(x+1)(y+1)=5

=>\(\left(x+1;y+1\right)\in\left\{\left(1;5\right);\left(5;1\right);\left(-1;-5\right);\left(-5;-1\right)\right\}\)

=>\(\left(x,y\right)\in\left\{\left(0;4\right);\left(4;0\right);\left(-2;-6\right);\left(-6;-2\right)\right\}\)

Bài 1:

a) \(a=2\cdot3\cdot5\cdot43\)

\(b=7200=2^5\cdot3^2\cdot5^2\)

\(c-4680=2^3\cdot3^2\cdot5\cdot13\)

b) \(\dfrac{8440}{5910}=\dfrac{8440:10}{5910:10}=\dfrac{844}{591}\)

\(\dfrac{1245}{3450}=\dfrac{1245:15}{3450:15}=\dfrac{83}{230}\)

Bài 2:

a) Ước nguyên tố của 140 là:

\(ƯNT\left(140\right)=\left\{2;5;7\right\}\)

Ước nguyên tố của 138 là:
\(ƯNT\left(138\right)=\left\{3;23;2\right\}\)

b) \(A=\dfrac{2^{10}+4^6}{8^4}\)

\(A=\dfrac{2^{10}+2^{12}}{2^{12}}\)

\(A=\dfrac{2^{10}\cdot\left(1+2^2\right)}{2^{12}}\)

\(A=\dfrac{1+4}{2^2}\)

\(A=\dfrac{5}{4}\)

\(B=\dfrac{6^{10}+15\cdot2^{10}\cdot3^9}{12\cdot8^3\cdot27^3}\)

\(B=\dfrac{2^{10}\cdot3^{10}+5\cdot2^{10}\cdot3^{10}}{2^{11}\cdot3^{10}}\)

\(B=\dfrac{2^{10}\cdot3^{10}\cdot\left(1+5\right)}{2^{11}\cdot3^{10}}\)

\(B=\dfrac{1+5}{2}\)

\(B=3\)