Pascal & Perfect Number

[Chinese_Fireball]

Hỏi về sườn làm 1 bài tập pascal là nhập 1 số từ bàn phím, cho biết số đó có phải là số hoàn hảo hay ko nhé các bác? Sẵn cho hỏi luôn làm thế nào để computer của mình có Borland Pascal hay Turbo Pascal luôn nhá?

 

[pmphuong]

Lấy Pascal từ đâu? Google.com !

 

[lonton_16]

Số hoàn hảo là số có tổng các ước ko kể chính nó = chính nó
VD: 28= 1+2+4+7+14
Cách làm Nhập số cần kiểm tra :n
S là tổng, gán S=0
Cho i chạy từ 1 tới n\2 (phần nguyên của phép chia n cho 2, có thể thay là n-1 cũng chả sao)
nếu n mod i = 0 (n chia hết cho i) thì S=S+i
Thực hiện xong vòng lặp, kiểm tra xem S có bằng n ko, nếu bằng thì là số hoàn hảo

 

[Chinese_Fireball]

A, đúng rồi, cám ơn lonton nhé. Mod lock topic này lại giùm tớ nhé