Follow us on...
Follow us on Twitter Follow us on Facebook Watch us on YouTube

Giúp các bé đáng thương ấy với

Gameshow “Ai Là Triệu Phú” trên VTV đang chờ đón bạn – Tải ngay!

Bán đấu giá ủng hộ từ thiện

Ngập tràn ưu đãi cho tín đồ công nghệ tại sony show 2014

Chiêm ngưỡng BaoMoi đẹp "tuyệt diệu" trên Windows Phone

Tin tức công nghệ mới
kết quả từ 1 tới 9 trên 9
  1. #1
    kinhthikute's Avatar
    kinhthikute vẫn chưa có mặt trong diễn đàn Thành viên đang bị kỷ luật
    Tham gia
    Apr 2009
    Đến từ
    Địa Ngục
    Bài
    23
    Cảm ơn
    29
    Điểm
    8/3 bài viết

    Default CT rút gọn phân số

    Có bác nào ngon thì giãi dùm em


    Viết CT rút gọn 1 phân số về tốt giản cái !

  2. #2
    1071454's Avatar
    1071454 vẫn chưa có mặt trong diễn đàn Búa Gỗ Đôi
    Tham gia
    Aug 2008
    Bài
    32
    Cảm ơn
    2
    Điểm
    101/11 bài viết

    Default Reply

    Bạn chỉ cần viết hàm tìm ước chung lớn nhất của tử số và mẫu số.
    Sau đó chi mẫu và tử chp ước chung vừa tìm.
    vd: 3/9 có ucln = 3
    chia 3, 9 lan luot cho 3 duoc phan so rut gon la 1/3
    Thay đổi nội dung bởi 1071454; 06-06-2009 lúc 08:37.

  3. #3
    Hữu Ân's Avatar
    Hữu Ân vẫn chưa có mặt trong diễn đàn Rìu Vàng
    Tham gia
    Apr 2009
    Bài
    738
    Cảm ơn
    722
    Điểm
    595/166 bài viết

    Default

    Hơi vội nên thuật toán hơi cùi! Sài đỡ vậy
    private void button1_Click(object sender, EventArgs e)
    {
    try
    {
    int a = Convert.ToInt32(textBox1.Text);
    int b = Convert.ToInt32(textBox2.Text);
    int u = uocChungLonNhat(a, b);
    label1.Text = Convert.ToString(a / u);
    label2.Text = Convert.ToString(b / u);
    }
    catch (Exception ex)
    {
    MessageBox.Show(ex.Message, "error!");
    }
    }


    int uocChungLonNhat(int a, int b)
    {
    while (a != 0 && b != 0)
    if (a>b)
    a -= b;
    else
    b -= a;
    if (a == 0)
    return b;
    else
    return a;
    }
    Thay đổi nội dung bởi Hữu Ân; 06-06-2009 lúc 09:16.
    有恩

  4. #4
    quocman79's Avatar
    quocman79 vẫn chưa có mặt trong diễn đàn Búa Gỗ
    Tham gia
    Mar 2009
    Bài
    17
    Cảm ơn
    9
    Điểm
    0/0 bài viết

    Default

    Thuat toan UCLN

    int ucln (int a, int b) {
    while (a != 0 && b!=0) {
    if(a >= b) {
    a = a - b;
    }
    else {
    b = b -a;
    }
    }
    return (a + b);
    }

  5. #5
    phanloc87's Avatar
    phanloc87 vẫn chưa có mặt trong diễn đàn Gà Con
    Tham gia
    Jun 2009
    Bài
    2
    Cảm ơn
    0
    Điểm: 1/1 bài viết

    Default

    {
    int a=abs(tu) ;
    int b=abs(mau);
    while(a*b!=0)
    {
    if(a>b)
    a=a-b;
    else
    b=b-a;
    }
    tu=tu/(a+b);
    mau=mau/(a+b);

    }

  6. Có 1 thành viên cảm ơn phanloc87 cho bài viết này:
    dangkitaikhoan (23-12-2011)

  7. #6
    phanloc87's Avatar
    phanloc87 vẫn chưa có mặt trong diễn đàn Gà Con
    Tham gia
    Jun 2009
    Bài
    2
    Cảm ơn
    0
    Điểm: 1/1 bài viết

    Default

    {
    int a=abs(tu) ;
    int b=abs(mau);
    while(a*b!=0)
    {
    if(a>b)
    a=a-b;
    else
    b=b-a;
    }
    tu=tu/(a+b);
    mau=mau/(a+b);

    }

  8. #7
    vumanhtuan87's Avatar
    vumanhtuan87 vẫn chưa có mặt trong diễn đàn Rìu Vàng
    Tham gia
    Oct 2007
    Đến từ
    Nhà ko số, phố ko tên
    Bài
    722
    Cảm ơn
    455
    Điểm
    755/162 bài viết

    Default

    bạn nên viết thành 1 lớp Phân số trong đó có phương thức rút gọn phân số sẽ là hay nhất
    Rút gọn phân số là lấy tử và mẫu chia cho uscln

  9. #8
    famdam92's Avatar
    famdam92 vẫn chưa có mặt trong diễn đàn Búa Gỗ
    Tham gia
    Sep 2008
    Bài
    24
    Cảm ơn
    83
    Điểm
    12/6 bài viết

    Default

    program daynt;
    uses crt;
    const nmax=100;
    var
    f1,f2:text;
    a,tuso,mauso:integer;

    function ucln(x,y:integer):integer;
    var sodu:integer;
    begin
    while y<>0 do
    begin
    sodu:=x mod y;
    x:=y;
    y:=sodu;
    end;
    ucln:=x;
    end;

    begin
    clrscr;
    writeln('nhap tu so');readln(tuso);
    writeln('nhap mau so');readln(mauso);
    a:=ucln(tuso,mauso);
    if a>1 then
    begin
    tuso:=tuso div a;
    mauso:=mauso div a;
    end;



    write('phan so rut gon la: ',tuso,' phan ',mauso);
    readln
    end.
    bạn thử cách này xem, mình chép trong sách ra đó ^^

  10. #9
    Tham gia
    Jul 2008
    Bài
    9
    Cảm ơn
    7
    Điểm: 1/1 bài viết

    Default

    bac nao giup em giai cai nay cai : 27/26 rut gon

 

 

Quyền sử dụng

  • Bạn không thể gửi chủ đề mới
  • Bạn không thể gửi trả lời
  • Bạn không thể gửi file đính kèm
  • Bạn không thể tự sửa bài viết của mình
  •