Программа нахождения решения линейного уравнения

@Vlad1234 · Регистрация: 27.02.2015

Студворк — интернет-сервис помощи студентам

Составьте программу нахождения решения линейного уравнения ах + b = 0. Заранее спасибо)

@APALoff · 27.02.2015, 16:19

Точно, такого в начальной школе не проходят...

Pascal

x:=-b/a;

@Puporev · 27.02.2015, 16:20

Pascal

var a,b,x:real;
begin
writeln('Введите коэффициенты a,b');
readln(a,b);
if (a=0) and (b=0) then
write('x-любое число')
else
 begin
  x:=-b/a;
  write('x=',x:0:2);
 end;
end.

Новичок · 28.02.2015, 01:36

И как всегда еще кое-что забыли...Когда а=0, b<>0.

@Puporev · 28.02.2015, 07:17

Pascal

var a,b,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('íåò ðåøåíèé')
else
 begin
  x:=-b/a;
  write('x=',x:0:2);
 end;
end.

@Vlad1234 0 / 0 / 0 Регистрация: 27.02.2015 Сообщений: 4
		1
	Программа нахождения решения линейного уравнения 27.02.2015, 15:45. Показов 12063. Ответов 4 Метки нет (Все метки) Составьте программу нахождения решения линейного уравнения ах + b = 0. Заранее спасибо) 0

Новичок 1642 / 1091 / 487 Регистрация: 17.07.2012 Сообщений: 5,345
	28.02.2015, 01:36	4
	И как всегда еще кое-что забыли...Когда а=0, b<>0. 0

Опции темы