Написать программу в паскале, которая ищет корень уравнения ах+b=0
Написать программу в паскале, которая ищет корень уравнения ах+b=0
Гость
Ответ(ы) на вопрос:
Гость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.
Не нашли ответ?
Похожие вопросы