JWorld@TW the best professional Java site in Taiwan
      註冊 | 登入 | 全文檢索 | 排行榜  

» JWorld@TW » Java 新手區  

按列印兼容模式列印這個話題 列印話題    把這個話題寄給朋友 寄給朋友    訂閱主題
reply to postflat modego to previous topicgo to next topic
本主題所含的標籤
無標籤
作者 [程式]質因數分解
Yoshi

塵世中一個迷途小書僮

版主

發文: 874
積分: 22
於 2005-01-23 01:54 user profilesend a private message to userreply to postreply to postsearch all posts byselect and copy to clipboard. 
ie only, sorry for netscape users:-)add this post to my favorite list
簡單的質因數分解程式,或許對新手有幫助

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
//質因數分解 2002.8.26 第二版
import javax.swing.*;
import java.awt.*;
import java.awt.event.*;
 
public class Practice1_2 extends JFrame implements ActionListener {
  JTextField outputField = new JTextField(30) , enterField= new JTextField(8);
  String output;
  boolean end = false;
  public Practice1_2 () {
    super("質因數分解");
    Container c =getContentPane();
    c.setLayout( new FlowLayout());
    c.add(enterField);
    c.add(outputField);
    outputField.setEditable(false);
    enterField.addActionListener(this);
    pack();
    show();
  }
 
  public void actionPerformed (ActionEvent e ) {
    String in = e.getActionCommand();
    enterField.setText("");
    output = in + " = " ;
    end = false;
    process(Integer.parseInt(in), 2);
  }
 
  public void process (int x, int y) {
    while (!end) {
      while ( x % y == 0) {
        output += y + "*";
        x /= y;
      }
      if ( y < x ) {
        y++;
      }
      else {
        output = output.substring(0, output.length()-1);
        outputField.setText(output);
        end = true;
      }
    }
  }
  public static void main (String [] args ) {
    Practice1_2 app = new Practice1_2();
    app.setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE);
  }
}


Yoshi edited on 2005-02-27 02:24
reply to postreply to post
YOSHI!
話題樹型展開
人氣 標題 作者 字數 發文時間
4614 [程式]質因數分解 Yoshi 1303 2005-01-23 01:54
1854 Re:[程式]質因數分解 caterpillar 85 2005-02-25 12:11
2233 Re:[程式]質因數分解 f15abcde 158 2005-02-27 02:09
2631 Re:[程式]質因數分解 Yoshi 249 2005-02-27 02:25
» JWorld@TW »  Java 新手區

reply to postflat modego to previous topicgo to next topic
  已讀文章
  新的文章
  被刪除的文章
Jump to the top of page

JWorld@TW 本站商標資訊

Powered by Powerful JuteForum® Version Jute 1.5.8