Линейное уравнение Опции

[ziprex]

Памагит решить линейное уравнение. Срочно нужно.
И так оно имеет вид kx+b=0 , где k и b-некоторые числа.
Если a = b = 0, то решением уравнения ax + b = 0 является любое число.
Если a = 0 и b ≠ 0, то уравнение корней не имеет.
Если a ≠ 0, то уравнение ax + b = 0 называется линейным и имеет ровно одно решение x=-k/a.
Пожалуйста, помогите чем можете. заранее благодарен.

[amega]

if (a=0) and (b=0) then writeln('решение любое число') 
else 
if (a=0) and (b<>0) then  writeln('уравнение корней не имеет') 
else 
 if a<>0 then x:=-b/a;

PS прочитай сначала конспект где приводилась инстукция операторов if then else

Сообщение отредактировано: amega - 10.12.2008 4:11