Barátságosnak mondunk két természetes számot, ha az egyik (nála kisebb) osztóinak összege megegyezik a másik számmal és viszont. Döntsük el két természetes számról, hogy barátságosak-e?

Kódot nem tudok írni, maximum C-ben, a Pascalos ismereteim már hanyatlóban vannak.

1.Bekéred a két számot (szam1, szam2)

2.Indítasz egy for ciklust 1-től szam1+1-ig, majd megvizsgálod a ciklusban, hogy a ciklusváltozó(i) osztója-e szam1-nek (if(szam1 mod i)= 0), akkor növelsz egy változót

3.A második pontot hajtsd végre szam2-re is egy másik ciklusban, és ott egy másik változót növelj:)

Ha megvan a két ciklus, meg a két eredmény, akkor egy egyszerű if-ben meg tudod nézni, hogy szam1osztóösszeg==szam2 &&szam2osztóösszeg==szam1