Рассмотрев дискриминант D = B^2 — 4*A*C, проверить истинность высказывания: «Квадратное уравнение Ax^2+ Bx + C = 0 имеет вещественные корни» — Pascal(Паскаль)

Даны числа A, B, C (число A не равно 0).

Program Boolean24;

Var
  a, b, c, D: Integer;

Begin
  ReadLn(a, b, c);
  D := Sqr(b) - 4 * a * c;
  WriteLn(D >= 0);

end.

Похожие записи/страницы:

Leave a Comment

+ 22 = 29