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

Question

Информатика

Мокий

22 сентября, 14:36

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

+1

Ответы (1)

Знаете ответ на вопрос?

Дия · Answer 1

Var

a, b: real;

begin

read (a, b) ;

if a 0 then

writeln ('x = ', - b/a)

else if b = 0 then

writeln ('Any number')

else

writeln ('No solutions')

end.