print("Nhập vào số N cần tính tổng các ước số: ") 

n = int(input())

sum = 0 

for i in range(1, n+1):   

            if (n % i == 0):        

                   sum += i 

 print("Tổng tất cả các ước số ", n, " là: ", sum)

$#Trumtinhoc$

Câu 6:

var n,d,i:longint;

begin

write('Nhap n: '); readln(n);

for i:= 1 to trunc(sqrt(n)) if n mod i = 0 then inc(d);

d:=d*2;

if sqrt(n)=trunc(sqrt(n)) then dec(d);

write('Uoc so la: ',d);

readln;

Câu 8:

var i,d,n:longint;

begin

write('Nhap n: '); readln(n);

for i:= 1 to n do

if i mod 3 = 0 then inc(d);

write('Tong la: ',d);

end.