Pascal

[Marina]

Помогите,пожалуйста, составить программу в Паскале для уравнений вида: $ax^2+c=0$

[ewert]

Это невозможно. Не задана спецификация: что, мол, дано и что требуется найти.

[Marina]

А так слабо было написать:
begin
if ((a=0)and(c=0))
then
wrinteln("Все действительные числа");
else if ((a<>0)and(c*a<0)) then
writeln("x1=-",sqrt(c/a),"x2=",sqrt(c/a));
else writeln ("Корней нет");
end.

[p51x]

А слабо было вопрос нормальный задать?