Написать программку в паскале, которая отыскивает корень уравнения ах+b=0

Написать программку в паскале, которая разыскивает корень уравнения ах+b=0

Задать свой вопрос
1 ответ
Var
 a,b: real;
begin
 read(a,b);
 if a lt;gt; 0 then
  writeln('x = ', -b/a)
 else if b = 0 then
  writeln('Any number')
 else
  writeln('No solutions')
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт