1) Nhập 1 số nguyên n. Tính tổng các ước số của n VD n = 30 tong uoc so = 72

Bởi

1) Nhập 1 số nguyên n. Tính tổng các ước số của n
VD n = 30 tong uoc so = 72

0 bình luận về “1) Nhập 1 số nguyên n. Tính tổng các ước số của n VD n = 30 tong uoc so = 72”

  2. program tong_uoc;

    uses crt;

    var n,i,t:integer;

    begin

         clrscr;

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

         t:=0;

         for i:=1 to n do

              if n mod i=0 then t:=t+i;

         write(‘Tong cac uoc cua ‘,n,’ la: ‘,t);

         readln;

    end.

    Bình luận

Viết một bình luận