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

269

412

Посмотреть ответы 2

Ответы на вопрос:

protekte

Информатика

4,5(16 оценок)

PascalABC.NET

begin

var (a, b, c) := ReadReal3('Введите a, b, c:');

if a = 0 then exit;

var D := sqr(b) - 4 * a * c;

println('Дискриминант:',D);

if D > 0 then begin

print('x1 =',(-b+sqrt(D))/(2*a));

print('x2 =',(-b-sqrt(D))/(2*a));

end

else if D = 0 then

print('x =', -b / (2 * a))

else if D < 0 then

print('Корней нет');

end.

fietisov

Информатика

4,4(92 оценок)

Сполучну лінію – це лінія з точками з'єднання на кожному з кінців, що залишається на зв'язку з фігурами, до яких ви його під'єднали. Сполучні лінії можуть бути прямими Пряма сполучна лінія , лікоть (похилі) Сполучна лінія ліктя або вигнутим Вигнута сполучна лінія . Коли ви вибрали сполучну лінію, точки відображаються в контурі фігури. Ці крапки вказують місце, де можна вкласти сполучну лінію.