[es] - Jel oce neko da mi uradi zadatak u Delphiju

ivanicas
Ivana Savic
Beograd

Član broj: 24813
Poruke: 1
*.vdial.verat.net

Profil

Jel oce neko da mi uradi zadatak u Delphiju

^{17.04.2004. u 13:49}

Meni je ludi profesor zadao da uradim neki program za raspust al nista nije objasnio! Ako neko moze da pomogne bila bih zahvalna! Vrlo! Javljajte se sto pre. Raspust je jos samo 2 dana! UPOMOC!

^{17.04.2004. u 13:49}

rilax
Sergio Reluck
/root/Serbia/Kurshumliya

Član broj: 22393
Poruke: 32
*.vdial.verat.net

Profil

Re: Jel oce neko da mi uradi zadatak u Delphiju

^{17.04.2004. u 14:29}

E, ajd' daj taj zadatak da vidimo kakav je...

10 BEGIN
20 HOME_SWEET_HOME
30 GOTO 20

^{17.04.2004. u 14:29}

Bojan Kopanja
Bojan Kopanja
Senior Web Developer, Master-Develop
Stara Pazova

Član broj: 6155
Poruke: 499
*.ptt.yu

ICQ: 346697685
Sajt: www.zeussoftware.rs

Profil

Re: Jel oce neko da mi uradi zadatak u Delphiju

^{17.04.2004. u 16:58}

Da, ajde javi sta treba da radi program, pa da raspalimo

!!!

ex Strog

http://www.zeussoftware.rs

^{17.04.2004. u 16:58}

Gojko Vujovic
Juniper Networks
Amsterdam, NL

Administrator
Član broj: 1
Poruke: 13173
*.gojko.ss.

Sajt: www.gojkovujovic.com

Profil

Re: Jel oce neko da mi uradi zadatak u Delphiju

^{18.04.2004. u 12:21}

Evo pošto sam ja dobio ovo na private a naravno nemam vremena da ga rešavam, pa vi izvolite:

Napraviti Delphi projekat koji unosi gradove i rastojanja medju njima u string grid-u.Rastojanja su izrazena celim brojevima ako 2 grada nisu direktno povezana putem treba uneti -1. Program po selektovanju dva grada nalazi minimalan put izmedju njih. Ako puta nema vraca poruku da gradovi nisu povezani!

^{18.04.2004. u 12:21}

bancika
Branislav Stojkovic
Nis, New York

Član broj: 24844
Poruke: 620
195.252.103.*

ICQ: 84215453
Sajt: www.storm-software.co.yu/..

Profil

Re: Jel oce neko da mi uradi zadatak u Delphiju

^{18.04.2004. u 13:56}

znam ovo, da pogledam malo pa cu poslati...valjda

Ride the rainbow, crack the sky

^{18.04.2004. u 13:56}

-zombie-
Tomica Jovanovic
freelance programmer
ni.ac.yu

Član broj: 4128
Poruke: 3448
*.beotel.net

Sajt: localhost

Profil

Re: Jel oce neko da mi uradi zadatak u Delphiju

^{18.04.2004. u 16:31}

Citat:

Gojko Vujovic:
Evo pošto sam ja dobio ovo na private

hehe, da nisi možda i "ti ovde najpametniji".. :-P

blogče :: unescaped beta^{^» ^{go-paste extenzija} ^» ^{reč dana: backup} ^» ^{bočne koalicije}}

^{18.04.2004. u 16:31}

rilax
Sergio Reluck
/root/Serbia/Kurshumliya

Član broj: 22393
Poruke: 32
*.vdial.verat.net

Profil

Re: Jel oce neko da mi uradi zadatak u Delphiju

^{18.04.2004. u 17:37}

Mozes da uradis sa obicnim backtrackom. Nabi u jednu matricu NxN brojke tako da je na mestu A,B udaljenost grada A od B ili -1 ako nisu povezani putem. Ovim si opisao graf povezanosti. Onda napravi niz tipa Boolean kojim kontrolises da li je grad preko koga prolazis vec usao u sastav puta, jer ti petlje u grafu sigurno nisu potrebe. Treba ti jos jedna varijabla u kojoj cuvas minimalni put, i obicna rekurzija da to obradi...

recimo:

const maxn=200;
var veze: array [maxn, manx] of integer;
min, put, i, n, A, B: integer;
ukljucen: array[1..maxn] of Boolean;

// ovde dodje kod koji strpa podatke iz grida u matricu veze
// u n je broj gradova, A i B su gradovi izmedju kojih trazis rastojanje
for i:=1 to n do ukljucen:=n;
min:=MaxInt; //ili neki veliki broj od kog je minimalno rastojanje sigurno manje...
put:=0;

procedure Obidji(g : integer);
var cik: integer;
begin
ukljucen[g]:=true;
if (g=B) and (put<min) do min:=put;
for cik:=1 to n do
if (veze[g, cik]<>-1) and (not ukljucen[cik]) do
begin
put:=put+veze[g, cik];
Obidji(cik);
put:=put-veze[g, cik];
end;
uklucen[g]:=false;
end;

procedureu pozivas sa Obidji(A); i u min pokupi najkrace rastojanje.

Javi ako ima bug, da ispravljamo....

BTW: Sigurno ima dobrih heuristika ili brand&bacch-ova za ovo ali nemam kad da se majem sa time sada...
10 BEGIN
20 HOME_SWEET_HOME
30 GOTO 20

^{18.04.2004. u 17:37}

Miloš Vukotić
Podgorica

Član broj: 7996
Poruke: 485
195.66.163.*

Profil

Re: Jel oce neko da mi uradi zadatak u Delphiju

^{18.04.2004. u 17:39}

Naravoučenije ove teme: kad hoćeš da momci sa ES-a odrade nešto umjesto tebe, samo se registruj sa nekim ženskim korisničkim imenom (po mogućstvu mazno-erotskim, npr. Ilona, Silvija...)
Eh, pitam se kakvi bi odgovori pali da je naša Ivanica odabrala username "Milorad"

^{18.04.2004. u 17:39}