Помогите пожалуйста Решить уравнение ax+b=0. a и b вводятся с клавиатуры.для паскаляесли...

Question

Помогите пожалуйста
Решить уравнение ax+b=0. a и b вводятся с клавиатуры.
для паскаля

если сможете ещё и блок-схему.

Comments

да

Answer 1

Program uravnenie;
Var a,b,x: real;
BeginWriteln (' введите a');
Readln (a);Writeln (' введите b');
Readln(b);
x:=(0-b)/a;
Writeln(' x равно=',x);
Readln (x);
End.
___________________________________