[Turbo Delphi] Prosty Programik

	Strona Główna -> Forum elektroda -> Programowanie ogólne -> Programowanie początkujący -> [Turbo Delphi] Prosty Programik

Autor

Wiadomość

krwawa_nutria
Poziom 3

Dołączył: 19 Lut 2009
Posty: 5
Miasto: Rzeszów

04 Cze 2009 03:00

[Turbo Delphi] Prosty Programik

Witam.

Muszę napisać pewien programiczek w Języku Turbo Deplhi (korzystam z oficjalnej legalnej wersji Explorer 2006 for Windows >> http://www.codegear.com/downloads/free/turbo) a jako że noga ze mnie praktycznie totalna z wszego rodzaju programowania to bardzo proszę o pomoc - może znajdzie się Forumowicz, który w swej łaskawości i przypływie kilku wolnych chwil sporządzi mi niniejszy programik, i któremu będę się mógł z przyjemnością odwdzięczyć ;-)

Program stricte obliczeniowy lecz koniecznie z niewielkim okienkiem do wprowadzania zmiennej oraz buttonem uruchamiającym ową machinerię, mianowicie - "Algorytm Newtona do znajdowania miejsca zerowego funkcji f(x) = 5sin(3x-2) + e^3x+1 w zadanym przedziale". Niby nic trudnego, teoretycznie ale jak to tałatajstwo przenieść w te okienko i kod to już nie mam bladego pojęcia...

[Turbo Delphi] Prosty Programik

Jedyną sensowną stronkę jaką znalazłem (wszelkie inne to jak by gorsze kopie tej właśnie) z praktycznie gotowym algorytmem/programem podaję poniżej, jest nawet listing z Delphi lecz niestety nie jest to kod obiektowy i mimo moich karkołomnych wręcz zabiegów nie byłem w stanie tego przeprogramować na postać, że tak to ujmę pseudo-programistycznie "wizualną" :

http://www.eioba.pl/a2344/miejsca_zerowe_funkcji_metoda_newtona

Z góry dziękuje za wszelką pomoc - nagroda dla wybawiciela do ustalenia na PW :>

Powrót do góry

bkm
Poziom 9

Dołączył: 28 Mar 2003
Posty: 37

04 Cze 2009 09:13

Re: [Turbo Delphi] Prosty Programik

Witam!
1.Z kodu źródłowego trzeba usunąć '{$APPTYPE CONSOLE}'
2.Zamienić wszystkie 'writeln' na odpowiednią metodę komunikacji z użytkownikiem np. 'memo1.Text:= 'Obliczanie pierwiastka funkcji - metoda Newtona';'
3.W zamian za 'readln;' wpisywać dane w pole 'Edit'
4.Przed obliczeniem konwertować dane z 'string' na liczbę np. 'x0:=StrToFloat(Edit1.Text);'
5. Jeśli wynik ma być wpisany do 'memo' trzeba znowu konwertować do 'string'.

Powrót do góry

Google
AdSense
Google Adsense

04 Cze 2009 09:13

Powrót do góry

krwawa_nutria
Poziom 3

Dołączył: 19 Lut 2009
Posty: 5
Miasto: Rzeszów

04 Cze 2009 10:48

Re: [Turbo Delphi] Prosty Programik

Bardzo Ci dziękuje za podpowiedź bkm, niemniej jednak 50% tego co napisałeś nadal jest dla mnie czarną d... dziurą ;-)

Czy mógłbym w związku z powyższym poprosić Cię, naturalnie jeżeli nie miałbyś niczego przeciwko, o gotowy program (albo chociaż kod) ?

Powrót do góry

bkm
Poziom 9

Dołączył: 28 Mar 2003
Posty: 37

04 Cze 2009 14:11