wanquan.java

来自「完全数问题代码」· Java 代码 · 共 63 行

import java.awt.*;
import java.awt.event.*;
import java.applet.*;

public class WanQuan extends Applet
{
        Label prompt;
        TextField L_input,U_input;
        int LowerLimit,UpperLimit;

        public void init()
        {
                prompt=new Label("Enter the lower and upper limit:");
                L_input=new TextField(4);
                U_input=new TextField(4);

                add(prompt);
                add(L_input);
                add(U_input);
        }

        public void paint (Graphics g)
 {int i=1,k=2,n=3,p=4,q=1;
  firstloop:
    for(n=LowerLimit ;n<UpperLimit; n++)
  {
         int sum=0;
       {for (i=1;i<n;i++)
      if (n%i==0)
          sum+=i;
          if(sum==n)
    g.drawString(Integer.toString(n),20
 +p*20,50+q*20);
      if (k > 10)
        {
          p++;
         k = 0;
        }
        else
        {
        k = k + 1;
        }
       }
    }
 }
        public boolean action(Event e,Object o)
        {
                int temp;
                if(e.target==U_input)
                {
                 LowerLimit=Integer.parseInt(L_input.getText());
                 UpperLimit=Integer.parseInt(U_input.getText());
                if(LowerLimit>UpperLimit)
                        {temp=LowerLimit;
                         LowerLimit=UpperLimit;
                         UpperLimit=temp;
                        }
                repaint();
                }
        return true;
        }

}