Viết chương trình nhập số nguyên n. Hãy đếm xem n có bao nhiêu ước khác 1 và chính nó.( giúp em với ạ)

0 bình luận về “Viết chương trình nhập số nguyên n. Hãy đếm xem n có bao nhiêu ước khác 1 và chính nó.( giúp em với ạ)”

1. var n, i, d: word;

   Begin

      Write(‘n = ‘); readln(n); d:=0;

      For i:= 1 to n do if n mod i = 0

           then inc(d);

      Write(‘co ‘, d, ‘ uoc thoa man’);

      Readln

   End.

   Bình luận