Giải phương trình ax+b=0 tin học 11

Thuật toán giải phương trình bậc nhất:

Bước 1: Nhập a, b;

Bước 2: Nếu a = 0, B≠ 0 thì thông báo vô nghiệm rồi kết thúc;

Bước 3: Nếu a = 0, B = 0 thì thông báo phương trình nghiệm đúng với mọi giá trị rồi kết thúc;

Bước 4: Nếu a ≠ 0 thì x = -b/a thông báo phương trinh có nghiệm duy nhất là x rồi kết thúc

CÂU HỎI HOT CÙNG CHỦ ĐỀ

Phần tự luận

Em hãy vẽ sơ đồ cấu trúc của một máy tính

Xem đáp án » 02/07/2020 1,149

Viết chương trình giải phương trình bậc 1 [ax + b = 0]

Program GIAI_PHUONG_TRINH_BAC_NHAT;

Var a,b,x:real;

Begin

   Clrscr;

   Writeln['GIAI PHUONG TRINH BAC NHAT: AX + B=0'];

   Writeln['————————————————————'];

   Write ['Nhap a= '];

   readln[a];

   Write ['Nhap b= '];

   readln[b];

   If[a=0] then

      If[b=0] then

         Writeln[' Phuong trinh co vo so nghiem']

      Else       

         writeln[' Phuong trinh vo nghiem']

   Else              Writeln['Phuong trinh co nghiem x=',-b/a:4:2];    

   Readln;

End.

Thuật toán giải phương trình ax + b = 0

- Bằng liệt kê tuần tự

Bước 1: Nhập hai số thực a, b

Bước 2. Nếu a = 0

Bước 2.1. Nếu b ≠0 thì thông báo phương trình vô định, rồi kết thúc;

Bước 2.2. Nếu b = 0 thì gán x

Chủ Đề