Молю, помогите с курсовой!..

← →
Kapoo (2006-05-25 19:16) [0]

Курсовой работой по программированию является Лабораторная работа №3 из какого-то либо учебника либо еще откуда, мне сразу ксерокопию страницы дали. Тема: Вычисление определенных интегралов и решение алгебраических и трансцендентных уравнений.
Далее идут шесть методов интегрирования:
1) Прямоугольника
2) Трапеций
3) Симпсона
4) Бодэ
5) Уэддля
6) Ньютона-Котеса.

Прилагаются формулы методов, пояснения какие-то. Нужно реализовать эти формулы в делфи, то есть, как я понял, сделать программу, которая будет интегрировать этими методами... НО я в программировании никакой почти... и от этой курсовой очень и очень многое зависит. Прошу Вас, помогите! Кто-нибудь мог бы написать мне эти методы на делфи? Отсканированное задание имеется! Это очень-очень нужно...(( я просто лечу по этому предмету...

← →
Kapoo (2006-05-25 19:23) [1]

Мне сдать этот предмет и больше никогда его не видеть в институте!( Но сначала сдать, иначе и института мне не видеть. К кому не обращался - никто не может помочь, преподша - гадина (не обсуждается, уже давнишняя история), плюс сам предмет мне не поддается! Пожалуйста, помогите. У меня сейчас с деньгами сильные-сильные проблемы, но если вдруг что.., то с меня причетается..

← →
elrevin (2006-05-25 20:12) [2]

Ты в самих этих методах-то шаришь? Я имею ввиду если ты мне их на бумажке распишешь, то запрограть то не сложно.

← →
Kapoo (2006-05-25 20:17) [3]

О да-да! Я могу проще сделать: есть сканированная версия всего этого, все уточнения, пояснения и математическая запись! Мне сюда ее не прикрепить, так что посредством mail или icq могу передать. Тут ужатый интерфейс для записей. Как будет удобнее?

← →
paul_k © (2006-05-26 08:36) [4]

удобнее бедет если Вы, мил человек, сядете, распишете решение заданого выам уравнения по каждому методу и запрограмируете сами. кроме операторов присваивания сравнения и цикла Вам ничего не надо. Описание этих операторов рекомендуется читать у Фаронова или в любом другом учебнике по Паскалю/Дельфи

← →
Polevi © (2006-05-26 08:53) [5]

что у вас в институте курсовые за деньги никто не делает ?

← →
tsa (2006-05-26 09:01) [6]

Прошлых лет курсовые взять, темы повторяются

← →
Kapoo (2006-05-26 10:03) [7]

Прошлых лет я не нашел, плюс никто курсовые мне не даст, так вот "любит" меня преподша, да и не только меня.
В институте никого почти не знаю, кроме преподов, и знать особо не хочу.. говорить не с кем по этому поводу, никто не помогает.
А по учебнику пытался что-то сделать, но ничего не выходит... никак не могу закончить цикл, с цифрами разобраться, не понимаю я этот предмет, хоть он по идее и не сложный.
Само задание лежит на ящике lab3@list.ru в отправленных.
Пароль: qwerty03
plz, help...=(

← →
han_malign © (2006-05-26 10:12) [8]

> так вот "любит" меня преподша

- а уж как мы любим таких "специалистов", особенно когда после них рефакторинг делать приходится...
Так что переводитесь на специальность попроще - нет призвания - нефиг чужое место занимать.

← →
Kapoo (2006-05-26 10:43) [9]

Вот я и перевожусь на другую специальность, где нет программирования, но сначала это надо сдать, иначе вообще вылет.

← →
TUser © (2006-05-26 10:48) [10]

Вот я тебе сделаю, а ты потом к ИШу на работу устроишься - мне на твоем самолете летать? Или у ЮЗа теплодымопроводность наинтегрируешь, а мне потом в этом здании работать? Или чего проще - закодишь весы и кассовый аппарат в свою пользу. Нафиг.

← →
Kapoo (2006-05-26 11:03) [11]

> Или чего проще - закодишь весы и кассовый аппарат в свою
> пользу. Нафиг.

Как-то ты совсем котегорично... Пойми, не та ситуация у меня, что ты представил... Сейчас - Это ровно что в школе предметы, биологию мне нужно было сдать и сдал, попал в институт, там-то я хоть понимал..., но сама биология мне для будующего не пригодилась, и не хожу ведь как дурак, яды не творю и в биотехнологии никакие не лезу. Я - не тупое мясо, которое хочет пофиг где, лишь бы работать и деньги были, понимаю прекрасно, что да как и сам с людей иной раз фигею... Вот и дальше у меня не будет программирования, я перехожу на другую специальность, полюбому перехожу, но эту работу нужно сделать позарез!((

← →
TUser © (2006-05-26 11:08) [12]

Тут другое, ВУЗ ты сам выбирал. Никто тебе не навязывал именно этот, благо сегодня куда не плюнь - везде Академия какая-нибудь.

> Вот и дальше у меня не будет программирования, я перехожу на другую специальность, полюбому перехожу, но эту работу нужно сделать позарез!((

Знаешь сколько таких сказок тут рассказывают? Не всему же надо верить. Извини уж.

← →
Layner © (2006-05-26 11:12) [13]

Это конечно можно сделать, дня за 3 первый вариант, и потом ещё 2 на доводку, но денег тянет на штуку баксов, без преувеличения...

← →
Kapoo (2006-05-26 11:16) [14]

Да блин, какие еще сказки? У меня безнадёжная ситуация с яву, если я это не могу сделать, что мне дальше-то себе ..опу рвать незделанными работами? ВУЗ я выбирал из расчета, что смогу понять программирование и буду им заниматься чуть ли не в свободное время, но нихрена не вышел из меня программист. В Вуз-е есть другая специальность, на нее и метил, сейчас я вобще на общетехе, так что всё не так легко...

← →
tsa (2006-05-26 11:20) [15]

"я не бездействовал, я сразу на капу нажал"
Автор, что ты маешься! иди в свой институт и ходи студентов спрашивай, укажут тебе того/ту которая денег хочет и за это сделает тебе. На форуме же даже не видно "ты какого города"!
Не знаешь ты студентов и не хочешь, но - в магазине наверно получается отовариваться не зная продавцов и не желая ими стать :)

← →
paul_k © (2006-05-26 11:20) [16]

> Само задание лежит на ящике lab3@list.ru в отправленных.

А стопка денег там же лежит?:)
От обнаглела молодеж.
Нет напсать по людски делаю то и то, так и так.. наступаю на грабли вот тут и тут. помогите мол разобратся почему.

← →
Layner © (2006-05-26 11:23) [17]

Я тебе выход нашел, если надо, пиши. Сделаем быстро и качественно. Половину суммы отдам сайту http://www.delphimaster.ru на хостинг :)

← →
Kolan © (2006-05-26 11:23) [18]

Хочешь по интегралам дам?
Только на тот код лучьше не смотреть.. :) На 2 курсе делал. Все 4 метода, все работаю + график рисуется, но разобраться... :)

← →
Kapoo (2006-05-26 11:26) [19]

> Хочешь по интегралам дам?
> Только на тот код лучьше не смотреть.. :) На 2 курсе делал.
> Все 4 метода, все работаю + график рисуется, но разобраться.
> .. :)

Хотя бы что-то пригодится, может быть... вышли пожалуйста.

← →
tsa (2006-05-26 11:33) [20]

Халявщик наверно, только нафига тебе экономить и так студентов транжир не знаешь ;)

То, что пообещал дома. А на работе есть модуль, который решает интеграл методом прямоугольноков. Смотрите почту.

Чтобы не ругались за личную переписку:
Вот код ф-ции вычисления интеграла.
const Overflow = 25; var CurrentIntegral, PreviousIntegral: Double; OverflowCount: Longint; Summ: Double; SegmentCount: Longint; begin OverflowCount := 0; SegmentCount := 1; repeat if OverflowCount > 0 then PreviousIntegral := CurrentIntegral; CurrentIntegral := EvalOneIntegralValue(LeftRange, RightRange, SegmentCount); SegmentCount := SegmentCount * 2; OverflowCount := OverflowCount + 1; if OverflowCount > Overflow then begin Result := ieeOverflow; Answer := CurrentIntegral; Exit; end; until ((OverflowCount > 2) and CheckAccuracy(PreviousIntegral, CurrentIntegral, Accuracy)); Result := ieeNoErrors; Answer := CurrentIntegral; end;

← →
Kapoo (2006-05-26 11:56) [22]

> Вот код ф-ции вычисления интеграла.

Спасибо огромное! Постораюсь как-нибудь под свою работу упростить.

← →
Kapoo (2006-05-27 10:55) [23]

В общем вот один из методов

type
func = function(X : real) : real;
Function MetodLeftRect (F : func; A,B,EPS : real; N : longint) : real;
var
i : longint;
s1,s2,h : real;
begin
s2 := 0;
repeat
if N = 0 then begin MetodLeftRect := s2; exit end;
s1 := s2; s2 := 0; h := (B-A)/N;
for i := 0 to N-1 do s2 := s2+F(A+i*h);
s2 := h*s2;
N := 2*N;
if s1 = 0 then continue
until abs(s2-s1) <= EPS;
MetodLeftRect := s1
end;

Единчтвенный вопрос что такое F??????
Т.е. как я понял это и есть функция... но вот как она выглядит в своем первоначальном виде и как ее изменить в ходе работы програмы? Буду премного благодарен ибо такая же трабла как у Кароо

> Прошу Вас, помогите! Кто-нибудь мог бы написать мне эти
> методы на делфи?

Когда я учился, то делал сокурсникам курсовые подобного рода, чтобы заработать немного.
Поэтому мне не нравится та мысль, что кроме того что сам ничего с этого иметь не буду, так еще и лишу куска хлеба того кто сейчас делает курсовые за деньги.

← →
Kapoo (2006-05-31 09:35) [26]

> Когда я учился, то делал сокурсникам курсовые подобного
> рода, чтобы заработать немного.
> Поэтому мне не нравится та мысль, что кроме того что сам
> ничего с этого иметь не буду, так еще и лишу куска хлеба
> того кто сейчас делает курсовые за деньги.

Да со мной всё ясно уже и с теми, кто подобно твоим, высказывает свои мысли, а не по факту хоть чем-то помогает (..аж бесит такой офф.топ... :/ ... ).

Но вот дудидан - человек с конкретным вопросом, а его просто проигнорировали.. Не увлекайтесь, плз, в сарказм и язвиничество, это ровно что голодного хлебом дразнить, вертя его перед носом...

Kapoo (31.05.06 9:35) [26]
это ровно что голодного хлебом дразнить, вертя его перед носом...

Во-он ту гору видишь? Это удочки там лежат. Чтобы, значится, рыбу ловить. И кушать.

Уговорил, отвечу на [24]... Хоть и оффтоп, но может пригодиться и тебе.

В описанную функцию передается произвольная пользовательская, соответствующая шаблону func, т.е. имеющая один аргумент real и real же возвращающая.

Соответственно в первоначальном виде ее нет вообще, написать ее надо самому... в зависимости от того, что надо интегрировать.

В ходе работы программы ее, однако, не изменить, если такая функциональность требуется - то все несколько интереснее)

Virgo_Style © (31.05.06 9:51) [27]
не изменить

но, разумеется, можно передавать разные функции, написав их хоть полсотни

Молю, помогите с курсовой!.. Найти похожие ветки