|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
программа нахождения корней в би квадратном уравнении на Delphi
напишите пожайлуста
|
#2
|
||||
|
||||
Цитата:
Чтобы убедиться что ты их знаешь Если нет -> в раздел работа. Денег нет -> в гугль. Последний раз редактировалось Konrad, 25.10.2010 в 21:37. |
#3
|
|||
|
|||
ax^2+bx+c=0
|
#4
|
||||
|
||||
Цитата:
А чему равны корни? |
#5
|
|||
|
|||
d=b^2-4ac
x1:=(-b + Sqrt(diskrim))/2a; x2:=(-b - Sqrt(diskrim))/2a; Последний раз редактировалось zhenya20091, 25.10.2010 в 22:18. |
#6
|
||||
|
||||
Цитата:
|
#7
|
|||
|
|||
поправил . я мальчик )))
|
#8
|
||||
|
||||
Цитата:
Цитата:
Не все исправил. |
#9
|
|||
|
|||
теперь вроде бы всё )))
|
#10
|
||||
|
||||
Цитата:
Проверь еще раз... Цитата:
|
#11
|
|||
|
|||
условия ещё надо написать . дискриминант не должен быть <0
|
#12
|
||||
|
||||
Цитата:
Но в последнем твоем варианте формул все равно ошибка... |
#13
|
|||
|
|||
d=b^2-4ac
x1:=(-b + Sqrt(diskrim))/2a; x2:=(-b - Sqrt(diskrim))/2a; вот так ? |
#14
|
||||
|
||||
Цитата:
Тогда: PHP код:
О оптимизации не думал - в учебных целях ведь. Закинь на форму 3 Edit и 4 label-ки. Edit-ы соответственно а, б, с. Последний раз редактировалось Konrad, 25.10.2010 в 22:27. |
#15
|
|||
|
|||
Цитата:
би квадратное: ax^4+bx^3+cx^2+dx+e=0 |