Program Begin38;
Var
A, X, B: Real;
Begin
WriteLn('Введите A и B');
ReadLn(A, B);
WriteLn('x = ', -(B / A));
ReadLn;
End.
Program Begin38;
Var
A, X, B: Real;
Begin
WriteLn('Введите A и B');
ReadLn(A, B);
WriteLn('x = ', -(B / A));
ReadLn;
End.