class Kanzen
{
　　public static void main(String args[])
　　{ int n;
　　　　//2から1000までの数を順番にTest関数にわたし、完全数かどうかを判定させる
　　　　for(n=2; n<1000; n++){
　　　　　　//if(Test(n)) は、 if(Test(n)==true) という判定と同じ意味。
　　　　　　if (Test(n) == true){ ・・・①Test関数の結果がtrueだったら完全数である。
　　　　　　　　//完全数だったら出力する
　　　　　　　　System.out.println("完全数 : " + n);
　　　　　　}
　　　　}
　　}
 
　　//完全数かどうかを判断する関数。　完全数だったらtrueを返却、そうでなければfalseを返却する
　　//完全数とはその数自身を除く約数の和が、その数自身と等しい自然数のことである。(wikipediaより引用)
　　//処理概要としては、渡された値から1までを順番に総当りでチェックし、剰余を求める。剰余が0の場合は割りきれる数である。
　　//割り切れた値を順番に加算し、総当りチェックが終わった時に加算した値と渡された値が同じ値だったら完全数であると判断する。
　　static boolean Test(int n)・・・②　//nには①の処理で渡す引数が入るので、2～1000までが順番に渡される。
　　{ int i; //iは、1～nまでの数を総当りでチェックするための変数。
　　　int k; //kは、割り切れた数を加算していくための変数
　　　　//kを0で初期化しておく
　　　　k=0;
　　　　//n～1までの数を総当りで割り切れるかチェックする。剰余が0の場合は約数であり、0以外の場合は約数ではない。
　　　　//なお、8の約数は[1,2,4]。　6の約数は[1,2,3]のように、判定する数自身を2で割った数より大きな数は約数になることはないので、
　　　　//本当にn～1までの数を総当りで割り切れるかチェック必要はない。n/2からチェックを開始して無駄な処理を省略する。
　　　　for(i=n/2; i>0; i--){
　　　　　　if (n%i==0){
　　　　　　　　k+= i;　　//剰余が0の場合は約数なので、加算していく
　　　　　　}
　　　　}
　　　　if (n==k){
　　　　　return true;・・・③　//渡された値と、約数の合計がイコールだったら完全数なのでtrueを返却する
　　　　}
　　　　return false; ・・・④　//それ以外は完全数ではない。falseを返却する。
　　}
}
 

Y2xhc3MgS2FuemVuCnsK44CA44CAcHVibGljIHN0YXRpYyB2b2lkIG1haW4oU3RyaW5nIGFyZ3NbXSkK44CA44CAeyBpbnQgbjsK44CA44CA44CA44CALy8y44GL44KJMTAwMOOBvuOBp+OBruaVsOOCkumghueVquOBq1Rlc3TplqLmlbDjgavjgo/jgZ/jgZfjgIHlrozlhajmlbDjgYvjganjgYbjgYvjgpLliKTlrprjgZXjgZvjgosK44CA44CA44CA44CAZm9yKG49MjsgbjwxMDAwOyBuKyspewrjgIDjgIDjgIDjgIDjgIDjgIAvL2lmKFRlc3QobikpIOOBr+OAgSBpZihUZXN0KG4pPT10cnVlKSDjgajjgYTjgYbliKTlrprjgajlkIzjgZjmhI/lkbPjgIIK44CA44CA44CA44CA44CA44CAaWYgKFRlc3QobikgPT0gdHJ1ZSl7IOODu+ODu+ODu+KRoFRlc3TplqLmlbDjga7ntZDmnpzjgYx0cnVl44Gg44Gj44Gf44KJ5a6M5YWo5pWw44Gn44GC44KL44CCCuOAgOOAgOOAgOOAgOOAgOOAgOOAgOOAgC8v5a6M5YWo5pWw44Gg44Gj44Gf44KJ5Ye65Yqb44GZ44KLCuOAgOOAgOOAgOOAgOOAgOOAgOOAgOOAgFN5c3RlbS5vdXQucHJpbnRsbigi5a6M5YWo5pWwIDogIiArIG4pOwrjgIDjgIDjgIDjgIDjgIDjgIB9CuOAgOOAgOOAgOOAgH0K44CA44CAfQoK44CA44CALy/lrozlhajmlbDjgYvjganjgYbjgYvjgpLliKTmlq3jgZnjgovplqLmlbDjgILjgIDlrozlhajmlbDjgaDjgaPjgZ/jgol0cnVl44KS6L+U5Y2044CB44Gd44GG44Gn44Gq44GR44KM44GwZmFsc2XjgpLov5TljbTjgZnjgosK44CA44CALy/lrozlhajmlbDjgajjga/jgZ3jga7mlbDoh6rouqvjgpLpmaTjgY/ntITmlbDjga7lkozjgYzjgIHjgZ3jga7mlbDoh6rouqvjgajnrYnjgZfjgYToh6rnhLbmlbDjga7jgZPjgajjgafjgYLjgovjgIIod2lraXBlZGlh44KI44KK5byV55SoKQrjgIDjgIAvL+WHpueQhuamguimgeOBqOOBl+OBpuOBr+OAgea4oeOBleOCjOOBn+WApOOBi+OCiTHjgb7jgafjgpLpoIbnlarjgavnt4/lvZPjgorjgafjg4Hjgqfjg4Pjgq/jgZfjgIHlibDkvZnjgpLmsYLjgoHjgovjgILlibDkvZnjgYww44Gu5aC05ZCI44Gv5Ymy44KK44GN44KM44KL5pWw44Gn44GC44KL44CCCuOAgOOAgC8v5Ymy44KK5YiH44KM44Gf5YCk44KS6aCG55Wq44Gr5Yqg566X44GX44CB57eP5b2T44KK44OB44Kn44OD44Kv44GM57WC44KP44Gj44Gf5pmC44Gr5Yqg566X44GX44Gf5YCk44Go5rih44GV44KM44Gf5YCk44GM5ZCM44GY5YCk44Gg44Gj44Gf44KJ5a6M5YWo5pWw44Gn44GC44KL44Go5Yik5pat44GZ44KL44CCCuOAgOOAgHN0YXRpYyBib29sZWFuIFRlc3QoaW50IG4p44O744O744O74pGh44CALy9u44Gr44Gv4pGg44Gu5Yem55CG44Gn5rih44GZ5byV5pWw44GM5YWl44KL44Gu44Gn44CBMu+9njEwMDDjgb7jgafjgYzpoIbnlarjgavmuKHjgZXjgozjgovjgIIK44CA44CAeyBpbnQgaTsgLy9p44Gv44CBMe+9nm7jgb7jgafjga7mlbDjgpLnt4/lvZPjgorjgafjg4Hjgqfjg4Pjgq/jgZnjgovjgZ/jgoHjga7lpInmlbDjgIIK44CA44CA44CAaW50IGs7IC8va+OBr+OAgeWJsuOCiuWIh+OCjOOBn+aVsOOCkuWKoOeul+OBl+OBpuOBhOOBj+OBn+OCgeOBruWkieaVsArjgIDjgIDjgIDjgIAvL2vjgpIw44Gn5Yid5pyf5YyW44GX44Gm44GK44GPCuOAgOOAgOOAgOOAgGs9MDsK44CA44CA44CA44CALy9u772eMeOBvuOBp+OBruaVsOOCkue3j+W9k+OCiuOBp+WJsuOCiuWIh+OCjOOCi+OBi+ODgeOCp+ODg+OCr+OBmeOCi+OAguWJsOS9meOBjDDjga7loLTlkIjjga/ntITmlbDjgafjgYLjgorjgIEw5Lul5aSW44Gu5aC05ZCI44Gv57SE5pWw44Gn44Gv44Gq44GE44CCCuOAgOOAgOOAgOOAgC8v44Gq44GK44CBOOOBrue0hOaVsOOBr1sxLDIsNF3jgILjgIA244Gu57SE5pWw44GvWzEsMiwzXeOBruOCiOOBhuOBq+OAgeWIpOWumuOBmeOCi+aVsOiHqui6q+OCkjLjgaflibLjgaPjgZ/mlbDjgojjgorlpKfjgY3jgarmlbDjga/ntITmlbDjgavjgarjgovjgZPjgajjga/jgarjgYTjga7jgafjgIEK44CA44CA44CA44CALy/mnKzlvZPjgatu772eMeOBvuOBp+OBruaVsOOCkue3j+W9k+OCiuOBp+WJsuOCiuWIh+OCjOOCi+OBi+ODgeOCp+ODg+OCr+W/heimgeOBr+OBquOBhOOAgm4vMuOBi+OCieODgeOCp+ODg+OCr+OCkumWi+Wni+OBl+OBpueEoemnhOOBquWHpueQhuOCkuecgeeVpeOBmeOCi+OAggrjgIDjgIDjgIDjgIBmb3IoaT1uLzI7IGk+MDsgaS0tKXsK44CA44CA44CA44CA44CA44CAaWYgKG4laT09MCl7CuOAgOOAgOOAgOOAgOOAgOOAgOOAgOOAgGsrPSBpO+OAgOOAgC8v5Ymw5L2Z44GMMOOBruWgtOWQiOOBr+e0hOaVsOOBquOBruOBp+OAgeWKoOeul+OBl+OBpuOBhOOBjwrjgIDjgIDjgIDjgIDjgIDjgIB9CuOAgOOAgOOAgOOAgH0K44CA44CA44CA44CAaWYgKG49PWspewrjgIDjgIDjgIDjgIDjgIByZXR1cm4gdHJ1ZTvjg7vjg7vjg7vikaLjgIAvL+a4oeOBleOCjOOBn+WApOOBqOOAgee0hOaVsOOBruWQiOioiOOBjOOCpOOCs+ODvOODq+OBoOOBo+OBn+OCieWujOWFqOaVsOOBquOBruOBp3RydWXjgpLov5TljbTjgZnjgosK44CA44CA44CA44CAfQrjgIDjgIDjgIDjgIByZXR1cm4gZmFsc2U7IOODu+ODu+ODu+KRo+OAgC8v44Gd44KM5Lul5aSW44Gv5a6M5YWo5pWw44Gn44Gv44Gq44GE44CCZmFsc2XjgpLov5TljbTjgZnjgovjgIIK44CA44CAfQp9Cg==