Консультации

301. Квадратное уравнение

301. Квадратное уравнение

от Denis Fedorov -
Number of replies: 1
Какой формат вывода ожидается?
var d, a, b, c:real;
begin
readln(a);
readln(b);
readln(c);
d:=(b*b)-4*a*c;
if (d>0) then
begin
writeln((-b+sqrt(d))/(2*a));
writeln((-b-sqrt(d))/(2*a));
end
else if (d=0) then writeln((-b)/(2*a):1:0);
end.
Выводит неправильный ответ.
При проверке только один тест проходит и все.