Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.65/34: Рейтинг темы: голосов - 34, средняя оценка - 4.65
0 / 0 / 0
Регистрация: 16.03.2017
Сообщений: 2

Написать функцию, обеспечивающие решение квадратного уравнения

19.03.2017, 19:30. Показов 6295. Ответов 1

Author24 — интернет-сервис помощи студентам
Написать функцию, обеспечивающие решение квадратного уравнения. Параметрами функции должны быть коэффициенты и корни уравнения. Значение, возвращаемое функцией, должно передавать в вызывающию программу информацию о наличии у уравнения: 2 - два разных корня, 1 - корни одинаковые, 0 - уравнения не имеет решения. Кроме того, функция должна проверять корректность исходных данных. Если исходные данные неверные, то функция должна возвращать -1.
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
19.03.2017, 19:30
Ответы с готовыми решениями:

Решение квадратного уравнения
Написал, но работает не совсем исправно, подправьте, пожалуйста, где есть ошибки. P.S Если k<0 , то что надо + "Первый корень:0...

Решение квадратного уравнения
Вроде материал изучила и ещё больше запуталась....это просто тупо решение или надо код составлять???? SOS!!!! Ввести действительное...

решение квадратного уравнения
Ребят, помогите с составлением программы... Вновь слезно прошу! Добавлено через 28 минут S O S

1
Модератор
Эксперт Pascal/DelphiЭксперт NIX
 Аватар для bormant
7805 / 4627 / 2832
Регистрация: 22.11.2013
Сообщений: 13,144
Записей в блоге: 1
19.03.2017, 19:50
Лучший ответ Сообщение было отмечено Salazar47 как решение

Решение

Pascal Скопировано
1
2
3
4
5
6
7
8
9
10
function Solve2(a, b, c: Real; var x1, x2: Real): Integer;
var d: Real;
begin
  Solve2:=-1; if a=0 then Exit;
  d:=Sqr(b)-4*a*c;
  Solve2:=0; if d<0 then Exit;
  if d=0 then Solve2:=1 else Solve2:=2;
  a:=2*a; d:=SqRt(d);
  x1:=(-b+d)/a; x2:=(-b-d)/a;
end;
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
19.03.2017, 19:50
Помогаю со студенческими работами здесь

Решение квадратного уравнения вида ax^2+bx+c=0.
Решение расчетной задачи с использование математических функций в среде программирования. Решение квадратного уравнения вида ax^2+bx+c=0. ...

строки, файлы и решение квадратного уравнения
1. вывести слова, которые встречаются в строке менее 3х раз. 2. текствовый файл содержит сведения о книгах: фамилию автора, название...

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

Решение квадратного уравнения
Добрый день. Нужно написать программу для решения квадратного уравнения через дискриминант с самыми простыми функциями (if, else, then).

Решение квадратного уравнения
var a,b,c,d,f: integer; dis:boolean; begin write('Введите коэффициенты'); read(a,b,c); dis:=b*b+4*a*c&gt;0; if dis&gt;0 then ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Результаты исследования от команды MCM (март 2025 г.)
Programma_Boinc 07.04.2025
Результаты исследования от команды MCM (март 2025 г. ) В рамках наших текущих исследований мы продолжаем изучать гены, которые имеют наибольшую вероятность развития рака легких, выявленные в рамках. . .
Рекурсивные типы в Python
py-thonny 07.04.2025
Рекурсивные типы - это типы данных, которые определяются через самих себя или в сочетании с другими типами, которые в свою очередь ссылаются на исходный тип. В мире программирования такие структуры. . .
C++26: Объединение и конкатенация последовательностей и диапазонов в std::ranges
NullReferenced 07.04.2025
Работа с последовательностями данных – одна из фундаментальных задач, с которой сталкивается каждый разработчик. C++ прошел длинный путь в эволюции средств для манипуляции коллекциями – от. . .
Обмен данными в микросервисной архитектуре
ArchitectMsa 06.04.2025
Когда разработчики начинают погружаться в мир микросервисов, они часто сталкиваются с парадоксальным правилом: "два сервиса не должны делить один источник данных". Эта мантра звучит повсюду в. . .
PostgreSQL в Kubernetes: Автоматизация обслуживания с CNPG
Mr. Docker 06.04.2025
Администраторы баз данных сталкиваются с целым рядом проблем при обслуживании PostgreSQL в Kubernetes: как обеспечить правильную репликацию данных, как настроить автоматическое переключение при. . .
Async/await в TypeScript
run.dev 06.04.2025
Асинхронное программирование — это подход к разработке программного обеспечения, при котором операции выполняются независимо друг от друга. В отличие от синхронного выполнения, где каждая последующая. . .
Многопоточность в C#: Синхронизация потоков
UnmanagedCoder 06.04.2025
Многопоточное программирование стало неотъемлемой частью разработки современных приложений на C#. С появлением многоядерных процессоров возможность выполнять несколько задач параллельно значительно. . .
TypeScript: Классы и конструкторы
run.dev 06.04.2025
TypeScript, как статически типизированный язык, построенный на основе JavaScript, привнес в веб-разработку новый уровень надежности и структурированности кода. Одним из важнейших элементов этой. . .
Многопоточное программирование: Rust против C++
golander 06.04.2025
C++ существует уже несколько десятилетий и его поддержка параллелизма постепенно наращивалась со временем. Начиная с C++11, язык получил стандартную библиотеку для работы с потоками, а в последующих. . .
std::vector в C++: от основ к оптимизации производительности
NullReferenced 05.04.2025
Для многих программистов знакомство с std::vector происходит на ранних этапах изучения языка, но между базовым пониманием и подлинным мастерством лежит огромная дистанция. Контейнер std::vector. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru
Выделить код Копировать код Сохранить код Нормальный размер Увеличенный размер