Gia sư Cần Thơ, Dạy Kèm Cần Thơ

VỮNG TIN - TIẾP BƯỚC - THÀNH CÔNG


Phương trình đại số và siêu việt

Share
avatar
admin
Admin
Admin

Tổng số bài gửi : 1207
Points : 3010
Join date : 11/11/2009
Age : 37
Đến từ : Cần Thơ

Phương trình đại số và siêu việt

Bài gửi  admin on Sat Feb 27, 2010 12:04 pm

GIẢI PHƯƠNG TRÌNH BẬC 2

Code:
GiaiPTB2[a_, b_, c_] :=
    If[a == 0,
        If[b == 0,
          If[c == 0, Print["VSN"], Print["VN"]], Print["Phuong trinh co nghiem x = ", -c/b]],
           delta := b^2 - 4*a*c;
           If[delta > 0,
                 Print["x1=", (-b + Sqrt[delta])/(2a)];
                 Print["x2=", (-b - Sqrt[delta])/(2a)];
                 , If[delta == 0, Print["x=", -b/(2a)], Print["PT VN"]
            ]
      ]
    ];
a = Input["Nhap a"];
b = Input["Nhap b"];
c = Input["Nhap c"];
GiaiPTB2[a, b, c];

    Hôm nay: Mon Oct 15, 2018 8:49 pm