Составить программу для решения уравнения - PascalABC.NET

Узнай цену своей работы

Формулировка задачи:

Составить программу для решения уравнения a·|x| = b, где a и b - заданные действительные числа.

Решение задачи: «Составить программу для решения уравнения»

textual
Листинг программы
var a,b,c,x:real;
begin
writeln('Введите a,b');
readln(a,b);
if(a=0)and(b=0) then write('x-любое число')
else if(a<>0)and(b=0)then write('x=0')
else if(a=0)and(b<>0)then write('решений нет')
else
 begin
  c:=-b/a;
  if c<0 then write('решений нет')
  else write('x1=',c:0:2,' x2=',-c:0:2);
 end
end.

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

13   голосов , оценка 3.923 из 5
Похожие ответы