program wypisuje liczby doskonałe < 10 000