Найти функцию, позволяющую распознавать наличие вещественных корней в квадратном

Найти функцию, дозволяющую распознавать наличие вещественных корней в квадратном уравнение.
Делфи либо Паскаль

Задать свой вопрос
1 ответ
// PascalABC.NET 3.3, сборка 1555 от 21.10.2017
// Внимание! Если программка не работает, обновите версию!

begin
  var HasReal:(real,real,real)-gt;boolean:=(a,b,c)-gt;b*b-4*a*cgt;=0;
  Writeln(HasReal(5.5,-3,4.2));
  Writeln(HasReal(1,-2,-6))
end.

Результат
False
True

1-ая строчка - определение функции HasReal, остальные две - образцы обращения к ней.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт