Написать программу, которая решает линейное уравнение (уравнение вида ax+b=0)
Program n1; var a,b: real; begin readln(a,b); write('x=',-b/a); end.