|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
02.10.2011, 17:06 | #1 |
Регистрация: 02.10.2011
Сообщений: 5
|
решить уравнение на паскаль
решить уравнение
|
02.10.2011, 17:41 | #2 |
Пользователь
Регистрация: 25.03.2010
Сообщений: 53
|
алгоритм примерно такой:
i:=0; создаем цикл от t=-3 до t=3 с шагом 0.5 begin в нем находим дискриминант для уравнения с данным значением t. находим корни. записываем корни в массивы х1[i] и х2[i]. i:=i+1; end; создаем цикл от i=0 до i=11 для нахождения максимальных и минимальных иксов, где max и min соответствующие массивы begin if x1[i]>x2[i] then max[i]:=x1[i], min[i]:=x2[i] else max[i]=x2[i], min[i]:=x1[i]; end; вновь создаем цикл i=0 до i=11 бегин вычисляем уравнение где вместо х1 всавляем max[i], а вместо х2 вставляем min[i]. выводим результат енд. это всего лишь алгоритм, синтаксические нормы языка паскаль не учтены )
Мастерство программиста не в том, чтобы писать программы, работающие без ошибок, а в том, чтобы писать программы, работающие при любом количестве ошибок.
|
02.10.2011, 18:39 | #3 |
Регистрация: 02.10.2011
Сообщений: 5
|
Код:
________ Код нужно оформлять по правилам: тегом [CODE]..[/СODE] (это кнопочка с решёточкой #) Не забывайте об этом! Модератор. Последний раз редактировалось Serge_Bliznykov; 02.10.2011 в 18:51. |
02.10.2011, 19:56 | #4 |
Пользователь
Регистрация: 25.03.2010
Сообщений: 53
|
Код:
в вашей программе d всегда будет равно само себе. и поэтому цикл while у вас всегда выполняется
Мастерство программиста не в том, чтобы писать программы, работающие без ошибок, а в том, чтобы писать программы, работающие при любом количестве ошибок.
Последний раз редактировалось Exoo; 02.10.2011 в 20:02. |
02.10.2011, 20:04 | #5 |
фонатик DELPHI
Форумчанин
Регистрация: 14.01.2008
Сообщений: 714
|
Код:
95% сбоев и ошибок приложений, находится в полу метрах от монитора
Последний раз редактировалось JUDAS; 03.10.2011 в 19:56. Причина: прощёлкал b2 |
02.10.2011, 20:23 | #6 |
Регистрация: 02.10.2011
Сообщений: 5
|
а как t задать?
|
03.10.2011, 19:53 | #7 |
Пользователь
Регистрация: 25.03.2010
Сообщений: 53
|
для начала.
Код:
а дальше я думаю выше приведенный код пользователем JUDAS должен вам помочь
Мастерство программиста не в том, чтобы писать программы, работающие без ошибок, а в том, чтобы писать программы, работающие при любом количестве ошибок.
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
как решить уравнение когда ln(-x) ? | chip115 | Помощь студентам | 0 | 27.11.2009 20:39 |
Решить уравнение : используя схему горнера решить с меньшим количеством умножений! | Rusl92 | Помощь студентам | 1 | 06.09.2009 23:24 |
помогите решить уравнение | fist53 | Паскаль, Turbo Pascal, PascalABC.NET | 3 | 04.06.2009 22:47 |
Помогите,пожалуйста, решить дифференциальное уравнение | Emi | Свободное общение | 1 | 22.05.2009 17:36 |