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

Question

Информатика

Анастасей

18 января, 00:04

Написать программу в паскале, которая ищет корень уравнения ах+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.