Дано уравнение ax+b=0. Найти решение этого уравнения или сообщить,что решения не существует.

Question

Дано уравнение ax+b=0. Найти решение этого уравнения или сообщить,что решения не существует.

Экономика

Гость

Ответ(ы) на вопрос:

Accepted Answer

VAR a,b:integer; x:real; begin writeln(' a='); readln(a); writeln ('b='); readln (b); x:=-b/a; if a =0 then writeln('uravnenie korney ne imeet') else writeln('korni uravneniya=',x); readln; end.