Bài tập và thực hành 1

Bài Tập Và Thực Hành 1
a) Gõ chương trình sau:
Program Giai_ptb2;
uses crt;
var a, b, c, D: real;
x1, x2: real;
Begin
clrscr;
write(‘a, b, c: ‘);
readln(a,b,c);
D:=b*b-4*a*c;
x1:=(-b-sqrt(D))/(2*a);
x2:=-b/a-x1;
write(‘x1 = ‘, x1:=6:2, ‘x2 = ‘, x2:6:2);
readln
end.


Hãy Thực Hiện Các Việc sau
b) Nhấn phím F2 và lưu chương trình với tên là PTB2.PAS
c) Nhấn tổ hợp phím ALT+F9 để dịch và sửa lổi cú pháp
d) Nhấn tổ hợp phím ctrl+F9 để thực hiện chương trình. Nhập các giá trị 1; -3; 2. Quan sát kết quả hiển thị trên màn hình.
e) Nhấn tổ hợp phím Ctrl+F9 rồi nhập các giá trị 1; 0; -2. Quan sát kết quả hiển thị trên màn hình
f) Sửa lại chương trình trên sao cho không dùng biến trung gian D. Thực hiện chương trình đã sửa với bộ dữ liệu trên
g) Sửa lại chương trình nhận được ở câu c) bằng cách thay đổi công thức tính x2
h) Thực hiện chương trình đã sửa với bộ dữ liệu1; -5;6. Quan sát kết quả trên màn hình
i) Thực hiện chương trình với bộ dữ liệu 1; 1;1 và quan sát kết quả trên màn hình
Viết chương trình giải phương trình giải phương trình nhất biến
ax+b=0 (a≠0)