Даны три квадратных уравнения. сколько из них имеют вещественные корни
1 уравнение ax^2+bx+c=0
2 уравнение bx^2+ax+c=0
3 уравнение cx^2+ax+b=0
объясните пожалуйста

1
это программу надо написать? где мы берем значенья переменных a,b,c ?
автар "мы должны сами ввести a,b,c,любые числа"

Ответы и объяснения

2013-12-15T13:50:43+00:00

Это Проверенный ответ

×
Проверенные ответы содержат надёжную, заслуживающую доверия информацию, оценённую командой экспертов. На "Знаниях" вы найдёте миллионы ответов, правильность которых подтвердили активные участники сообщества, но Проверенные ответы - это лучшие из лучших.
Var
    a, b, c: real;
    k := 0;

begin
    readln(a, b, c);
    k := k + integer(b * b - 4 * a * c >= 0);
    k := k + integer(a * a - 4 * b * c >= 0);
    k := k + integer(a * a - 4 * c * b >= 0);
    writeln(k);
end.

проверяем чтоб дискриминант был больше нуля, если вдруг не понятно