Question

Giải phương trình bậc nhất có dạng ax+b=0

Dữ liệu vào: 2 số a, b.

Dữ liệu ra: giá trị x tìm được, nếu không có giá trị tìm được thì ghi VN, nếu có nhiều giá trị tìm được thì ghi VSN

Ví dụ: 

TT	Dữ liệu vào	Dữ liệu ra	Giải thích
1	2 4	-2

Làm trên pascal

Answer 1

uses crt;

var a,b:integer;

begin

clrscr;

readln(a,b);

if (a=0) and (b=0) then write('VSN)'

else if (a<>0) then write(b)

else if (b<>0) then write(0)

else write(-b/a);

readln;

end.