Viết phần khai báo giải hệ phương trình bậc 1

2 câu trả lời

Phần khai báo:

var a1,b1,c1,a2,b2,c2,x,y:real;

Vì hệ phương trình là:

$\left \{ {{ax+by=c} \atop {a'x+b'y=c'}} \right.$

Mà trong pascal không cho viết a',b',c' nên phải thay thế cho thích hợp là a1,b1...

x,y phải luôn là real

còn a1,b1,c1,a2,b2,c2 có thể là giá trị nguyên (integer,longint...) nên bạn có thể điều chỉnh

var a, b, c, a_, b_, c_, x, y: real; 

Có thể dùng dấu "_" để thay cho dấu " ' " trong pascal, hoặc dùng các số 1, 2 tùy thích.

Các giá trị phải ở dạng real vì các số đó có thể là số thực.

Câu hỏi trong lớp Xem thêm