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 ạ) 20/07/2021 Bởi aikhanh 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 ạ)
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
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.