K
Khách

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.

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.

29 tháng 8 2023

cảm ơn bn đã giúp mik nhiều bn thông cảm

14 tháng 3 2015

mai chủ nhật mà cậu cũng đi học à?

14 tháng 3 2015

mọi ng ơi giúp m zới đi mà

6 tháng 1 2019

bạn có cần gấp không

6 tháng 1 2019

Mình cần gấp lắm, mong các bạn giúp đỡ

15 tháng 4 2019

Gọi các ước nguyên tố của số N là p ; q ; r và p < q < r

\(\Rightarrow p=2;q+r=18\Rightarrow\orbr{\begin{cases}q=5;r=13\\q=7;r=11\end{cases}\Rightarrow\orbr{\begin{cases}N=2^a.5^b.13^c\\N=2^a.7^b.11^c\end{cases}}}\)

 Với a ; b; c \(\in\)N  và  \(\left(a+1\right)\left(b+1\right)\left(c+1\right)=12\Rightarrow12=2.2.3\)

Do đó N có thể là \(2^2.5.13;2.5^2.13;2.5.13^2;2^2.7.11;2.7^2.11;2.7.11^2\)

N nhỏ nhất nên \(N=2^2.5.13=260\)