|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
28.08.2008, 16:49 | #1 |
Участник клуба
Регистрация: 29.07.2008
Сообщений: 1,091
|
Qu 1.0 - программа для решения квадратных уравнений
Написал программу для решения квадратных уравнений....Говорю сразу,серьезно Delphi начал изучать месяц назад, так что сильно не критикуйте....
Кто бы ты ни был - не думай о себе слишком (с)
|
28.08.2008, 19:10 | #2 |
Участник клуба
Регистрация: 29.07.2008
Сообщений: 1,091
|
И никаких отзывов.........
Кто бы ты ни был - не думай о себе слишком (с)
|
28.08.2008, 21:39 | #3 |
stopfake.org
Участник клуба
Регистрация: 03.05.2007
Сообщений: 1,927
|
Работает. Чего же боле? Что я могу еще сказать? (с)
|
28.08.2008, 21:58 | #4 |
Участник клуба
Регистрация: 26.10.2007
Сообщений: 1,244
|
А почему дискриминант записывается в правой части уравнения?
Умом Россию не понять, пока не выпито ноль пять,
А если выпито ноль пять всё делом кажется не хитрым, Попытка глубже понимать уже попахивает литром... |
29.08.2008, 12:49 | #5 |
Участник клуба
Регистрация: 29.07.2008
Сообщений: 1,091
|
Ну как дискриминант является результатом решения самого квадратного уравнения.А сами корни выходят из дискриминанта и значений b и a.
Кто бы ты ни был - не думай о себе слишком (с)
|
20.03.2010, 22:37 | #6 |
Новичок
Джуниор
Регистрация: 20.03.2010
Сообщений: 1
|
А у тя прога не правильно счетает)))
Ты видно в формуле забыл деленое на (2*а) ...if d >= 0 then begin x1:=(-b+Sqrt(d))/(2*a); x2:=(-b-Sqrt(d))/(2*a); ShowMessage('x1='+FloatToStr(x1)+'x 2='+FloatToStr(x2)); end else ShowMessage('Уравнение не имеет корней.');... Вот те частичный код /(2*a); - а вот это ты походу забыл))) Последний раз редактировалось GOOD; 20.03.2010 в 23:12. |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Сравнение 2-ух квадратных матриц размер 3*3 | Artem1987 | Помощь студентам | 2 | 23.03.2008 16:16 |
Задач о квадратных корнях | Иллидан | Паскаль, Turbo Pascal, PascalABC.NET | 14 | 11.03.2008 23:51 |
помогите с задачей "методы решения уравнений" | kano | Паскаль, Turbo Pascal, PascalABC.NET | 3 | 22.02.2008 20:52 |
Три квадратных уравнения. Найти минимальное значение среди действительных корней этих уравнений. Паскаль. | GE076 | Помощь студентам | 2 | 17.12.2007 20:41 |