• Naslovna
• FAQ
• Pravilnik
• O ES-u
• Tim
• Korisnici
• Statistike

 

• elitesecurity ::
• elitemadzone ::
• EMAIL ::
• RSS ::
• ES Mobile

  Niste ulogovani?  Username :   Password:   

• Registracija
• Zaboravili ste password?
• Flashback ▲▼
• Login problem?

 

Pretraga:

 

Srodne teme 14.04.2024. Re: Gde je Kejt? (samo pogrešni odgovori) 03.06.2002. Pascal - kovertovanje dela stringa u znak 04.02.2003. Exe+Exe u Pascalu ??? 04.02.2003. Zadatak u PAscalu 01.04.2006. igrice u turbo pascalu??? 10.08.2004. Zbirka zadataka za Turbo Pascal 05.10.2004. zadatak u pascalu HELP!!! 21.02.2005. Stampanje u turbo pascalu? 20.08.2005. Pascal--------------------------------->c/c++ 15.05.2012. Program u Turbo Pascalu Navigacija Brisanje liste Aktuelne teme u ovom forumu: StringGrid i pozicioniranje na njegovu.. Delphi 12 i RAD Studio 12 Da li delphi baguje? oncalc event i oduzimanje vrednosti Quick report i rownumber Castle Game Engine i Delphi 7 At komande za slanje SMS-a Delphi 11.3 Community Edition offline .. FastReport, okomito podijeljena strani.. Footer band u qreportu Firbird 2.5 insert u sotre procedure Firebird 1.5, kreiranje history-a, sav.. Delphi i calc fields Delphi 2007, broj linija koda, unit-i E fakture i delphi Izaberite forum: Linux Linux aplikacije Linux desktop okruženja Linux hardware Windows desktop Windows aplikacije Zaštita Office Windows drajveri Office :: Word Office :: Excel Macintosh Mac hardware Mac software Iphone Enterprise Networking SOHO Networking Wireless Windows mreže Linux mreže Wireless :: WiMax Wireless :: Mikrotik Wireless :: Wireless oprema Linux/UNIX serveri i servisi Unix BSD Skript jezici Security Virtualizacija Cloud Computing Services Security :: Kriptografija i enkripcija .NET 3D programiranje Art of Programming Asembler C/C++ programiranje Kernel i OS programiranje Pascal / Delphi / Kylix Java Embedded sistemi Perl PHP Python Visual Basic 6 Veštačka inteligencija Security Coding XML GameDev - Razvoj Igara Ostali programski jezici PHP :: PHP za početnike PHP :: Smarty template engine .NET :: .NET Desktop razvoj .NET :: ASP.NET .NET :: WPF Programiranje C/C++ programiranje :: C/C++ za početnike Baze podataka MySQL Oracle Access MS SQL Firebird/Interbase PostgreSQL Fiksna telefonija VoIP Udruženje korisnika teleko.. GSM - telefoni GSM - upotreba GSM - servisiranje Mreže i novosti Smartphone Mreže i novosti :: Mobilni internet Mreže i novosti :: Telenor - korisnički servis Mreže i novosti :: VIP - korisnički servis Mreže i novosti :: MTS - korisnički servis Smartphone :: Symbian OS Smartphone :: Windows Mobile Smartphone :: Android GSM - telefoni :: Nokia PDA Uređaji GPS Portable Players Anonimnost i privatnost ISP Browseri E-mail Instant Messaging FTP Google Hosting ISP :: Wireless mreže i ISP ISP :: ADSL E-mail :: Anti-spam Instant Messaging :: IRC Hosting :: Domeni Google :: Gmail E-Marketing Web aplikacije Web dizajn i CSS Web dizajn softver Web razvoj Pretraživači i SEO Flash Javascript i AJAX Web dizajn i CSS :: Kritike Grafički dizajn Izdavaštvo 3D modelovanje Rasterska grafika Vektorska grafika 3D modelovanje :: CAD/CAM Matične ploče, procesori .. Video karte i monitori Storage Ostali hardver Overclocking & Modding PC Konfiguracije Laptopovi Vodič za kupovinu - PC har.. Tablet PC Muzička produkcija Audio kompresija Audio softver Video produkcija Video kompresija Video softver Multimedijalni uređaji Digitalni fotoaparati Digitalne kamere Home Theater Digitalni fotoaparati :: Fotografija Digitalni fotoaparati :: Vodič za kupovinu - Digita.. Elektronika Elektrotehnika Elektronika :: TV uređaji Elektronika :: Radio elektronika i tehnika Elektronika :: Mikrokontroleri Elektronika :: Audio-elektronika Auto-elektronika :: Tuning Vodič za učenje Vodič za posao Vodič za emigraciju Fizika Matematika Nauka Sertifikati Informatika Vodič za učenje :: Seminarski radovi Vodič za učenje :: Obrazovne institucije Vodič za emigraciju :: Život u USA Vodič za emigraciju :: Život u Norveškoj Vodič za emigraciju :: Život u Nemačkoj E-Poslovanje E-Kupovina IT pravo i politika razvoja IT događaji IT berza poslova IS i ERP Ekonomija Berza Cryptocoins IT berza poslova :: Arhiva IT berze poslova IT pravo i politika razvoja :: Registar Nacionalnog ID E-Poslovanje :: E-Transakcije E-Poslovanje :: Forex E-Kupovina :: Platne kartice Digitalna Televizija Advocacy Ankete Predlozi i pitanja Vesti Čekaonica Vesti :: ES leto manifestacija MadZone TechZone Poljoprivreda AutoZone MotoZone Svakodnevnica Video igre MadZone :: Zanimljivi linkovi MadZone :: Kultura TechZone :: Ergonomija TechZone :: Grejanje TechZone :: Klimatizacija TechZone :: Bela tehnika AutoZone :: Fiat Panda club Lista poslednjih: 16, 32, 64, 128 poruka.

RnD57 Djordje Petrovic Novi Sad Član broj: 54969 Poruke: 31 *.nat-pool.nsad.sbb.co.yu. ICQ: 298181189 Profil Re: Zadatak u Turbo Pascalu, pomoć!!! 10.04.2005. u 20:11 - pre 231 meseci Ne bi trebalo da mozhesh ceo record da vracash kao vrednost funkcije... Probaj da vracash pokazivach na record ili redni broj pitanja koje je izabrano [tj. integer ili longint]. Tezhinu pitanja mozhesh da realizujesh tako shto cesh u fajlu sa pitanjima da ih klasifikujesh kao pitanja za 100din pitanja za 200din itd. pa da ishchitavash neko od onih koje odgovara trenutnom budzhetu... E sad, da li je vec izvucheno... mozhesh da napravish niz integera ili longintova od [maxPitanja] elemenata u koji cesh da smeshtash vec izabrana pitanja, pa pri biranju novog da pozivash funkciju koja ce da radi sa tim nizom. random... Odgovor na temu

Eugen Reisen Član broj: 54093 Poruke: 40 *.cmu.carnet.hr. Profil Re: Zadatak u Turbo Pascalu, pomoć!!! 10.04.2005. u 20:53 - pre 231 meseci Bi mogao tko da ovo ispravi jer vec sam sve pokusao i nikako da mi proradi: Function IzaberiPitanje(Rb: integer): TPitanje; begin Result := Pitanja[random(MaxBrojPitanja)]; {Prilikom biranja pitanja trebalo bi dodati jos i proveru da li je to pitanje vec izvuceno i na tezinu pitanja u odnosu na redni broj... bilo bi glupo da prvo pitanje bude teze od zadnjeg, zar ne?} Odgovor na temu

--SOULMaTe-- Nemanja Skoric Novi Sad Član broj: 1464 Poruke: 173 *.nat-pool.nsad.sbb.co.yu. Profil Re: Zadatak u Turbo Pascalu, pomoć!!! 10.04.2005. u 21:09 - pre 231 meseci Pa rekao ti je covek, turbo pascal ne podrzava vracanje sloga kao rezultat funkcije. Uzmi free pascal ako bas zelis to da radis. Don’t do drugs, sleep deprivation is better. Odgovor na temu

Srki_82 Srdjan Tot Me @ My Home Ljubljana Član broj: 28226 Poruke: 1403 82.208.201.* ICQ: 246436949 +10 Profil Re: Zadatak u Turbo Pascalu, pomoć!!! 10.04.2005. u 21:45 - pre 231 meseci Upsss... zaboravih da pascal ne moze da vraca record... ili koristi pointer na TPitanje ili vrati index za pitanje pa rati sa Pitanja promenljivom u glavnom delu. Play Store Odgovor na temu

RnD57 Djordje Petrovic Novi Sad Član broj: 54969 Poruke: 31 *.nat-pool.nsad.sbb.co.yu. ICQ: 298181189 Profil Re: Zadatak u Turbo Pascalu, pomoć!!! 10.04.2005. u 21:46 - pre 231 meseci Nisam siguran kako se beshe u pascalu nizovi prenose kao parametri [po adresi, naravno, ali kako to napisati]: Code: function proveri (longint temp, longint vecIzabranaPitanja[], var longint brojIzabranihPitanja) : boolean; var    boolean ok;   integer i; begin   ok:=true;     for i:=1 to brojIzabranihPitanja do if vecIzabranaPitanja[i]=temp then ok:=false;   if ok then begin     vecIzabranaPitanja[i+1]=temp;     brojIzabranihPitanja:=brojIzabranihPitanja+1; proveri:=ok;   end; function rbPitanja (vecIzabranaPitanja[], var brojIzabranihPitanja) : longint; var    longint temp; begin   repeat     temp:=random(maxBrojPitanja);   until proveri(temp, vecIzabranaPitanja[], brojIzabranihPitanja); end; random... Odgovor na temu

Eugen Reisen Član broj: 54093 Poruke: 40 *.cmu.carnet.hr. Profil Re: Zadatak u Turbo Pascalu, pomoć!!! 10.04.2005. u 21:47 - pre 231 meseci Dali bi možda tko mogao nekako ispraviti greške u programu milijaner??? Ako tko zna bio bih mu jako zahvalan!!!? Odgovor na temu

Eugen Reisen Član broj: 54093 Poruke: 40 *.cmu.carnet.hr. Profil Re: Zadatak u Turbo Pascalu, pomoć!!! 10.04.2005. u 21:57 - pre 231 meseci A kako bi onda ja trebao napisati ovu funkciju da bi radila: Function IzaberiPitanje(Rb: integer): TPitanje; begin Result := Pitanja[random(MaxBrojPitanja)]; End; Odgovor na temu

Srki_82 Srdjan Tot Me @ My Home Ljubljana Član broj: 28226 Poruke: 1403 82.208.201.* ICQ: 246436949 +10 Profil Re: Zadatak u Turbo Pascalu, pomoć!!! 10.04.2005. u 22:00 - pre 231 meseci Probaj sam da ispravis funkciju da vrati broj pitanja koju je udabrala umesto samog pitanja. Treba samo rezultat da promenis u integer i da vratis index... sasvim jednostavno. Kad to ispravis recicu ti sta dalje. Play Store Odgovor na temu

Eugen Reisen Član broj: 54093 Poruke: 40 *.cmu.carnet.hr. Profil Re: Zadatak u Turbo Pascalu, pomoć!!! 10.04.2005. u 22:09 - pre 231 meseci Možda ovako??? Function IzaberiPitanje(Result,Rb: integer): integer; begin Result := Pitanja[random(MaxBrojPitanja)]; End; Ne verujem. Jednostavno ne znam kako bi to postigao. Odgovor na temu

Srki_82 Srdjan Tot Me @ My Home Ljubljana Član broj: 28226 Poruke: 1403 82.208.201.* ICQ: 246436949 +10 Profil Re: Zadatak u Turbo Pascalu, pomoć!!! 10.04.2005. u 22:18 - pre 231 meseci Pa... tebi ce jedino pomoci citanje neke knjige o osnovama Pascala jer izgleda ne znas... pa... nista... a trazis da ti neko drugi uradi domaci zadatak ili sta vec sto nije po pravilniku ES-a. Play Store Odgovor na temu

Eugen Reisen Član broj: 54093 Poruke: 40 *.cmu.carnet.hr. Profil Re: Zadatak u Turbo Pascalu, pomoć!!! 10.04.2005. u 22:19 - pre 231 meseci Kako misliš da promenim index??? Odgovor na temu

Srki_82 Srdjan Tot Me @ My Home Ljubljana Član broj: 28226 Poruke: 1403 82.208.201.* ICQ: 246436949 +10 Profil Re: Zadatak u Turbo Pascalu, pomoć!!! 10.04.2005. u 22:21 - pre 231 meseci Kada napises Podaci[X] promenljiva Podaci je niz, a promenljiva X je index Play Store Odgovor na temu

Eugen Reisen Član broj: 54093 Poruke: 40 *.cmu.carnet.hr. Profil Re: Zadatak u Turbo Pascalu, pomoć!!! 10.04.2005. u 22:25 - pre 231 meseci Funkcije nikako ne mogu da shvatim, učim pascal oko 4mj a već radimo ovakve stvari. Odgovor na temu

Toyo Član broj: 45193 Poruke: 227 *.kovnet.co.yu. +1 Profil Re: Zadatak u Turbo Pascalu, pomoć!!! 10.04.2005. u 22:30 - pre 231 meseci Ajde ja cu da ti postujem za 1 sat. (posto vidim da ti to nece ici a ja nemam sta da radim) Skidam TP, pa cu da pocnem, samo nemoj vise ovo da radis. Ti bi bas hteo sve na tacni. Znam da je tesko, ali moras da se potrudis. Odgovor na temu

Eugen Reisen Član broj: 54093 Poruke: 40 *.cmu.carnet.hr. Profil Re: Zadatak u Turbo Pascalu, pomoć!!! 10.04.2005. u 22:31 - pre 231 meseci Kako bi trebalo definirati ovu funkciju? I kompajler mi neprestno javlja grešku u tome dijelu, a result kao da ne prepoznaje. Odgovor na temu

Eugen Reisen Član broj: 54093 Poruke: 40 *.cmu.carnet.hr. Profil Re: Zadatak u Turbo Pascalu, pomoć!!! 10.04.2005. u 22:34 - pre 231 meseci Hvala srkiju, toyi i svakome koji mi se trude pomoći. Znam da se to za vas sve čini kao igra, ja zbilja u to ulažem mnogo napora i uistinu se trudim da shvatim taj Pascal. Odgovor na temu

Srki_82 Srdjan Tot Me @ My Home Ljubljana Član broj: 28226 Poruke: 1403 82.208.201.* ICQ: 246436949 +10 Profil Re: Zadatak u Turbo Pascalu, pomoć!!! 10.04.2005. u 22:38 - pre 231 meseci Code: function IzaberiPitanje(Rb: integer): integer; begin Result := Random(MaxBrojPitanja); End; To ti je ta funkcija, ali sad glavni deo nece raditi pa ces morati da u promenljivu Pitanje upacis Pitanja[IzaberiPitanje]. To ces uratidi sa Move komandom. Code: Move(Pitanja[IzaberiPitanje], Pitanje, SizeOf(TPitanje)); Sad jos samo stavi to na pravo mesto i probaj da pokrenes program. Play Store Odgovor na temu

Eugen Reisen Član broj: 54093 Poruke: 40 *.cmu.carnet.hr. Profil Re: Zadatak u Turbo Pascalu, pomoć!!! 10.04.2005. u 22:42 - pre 231 meseci Ali program ne prepoznaje result i piše unknown identifier. Odgovor na temu

Srki_82 Srdjan Tot Me @ My Home Ljubljana Član broj: 28226 Poruke: 1403 82.208.201.* ICQ: 246436949 +10 Profil Re: Zadatak u Turbo Pascalu, pomoć!!! 10.04.2005. u 22:45 - pre 231 meseci Cudno... zar TP 7 ne podrzava Result promenljivu u funkcijama!? Ako je to problem samo umesto Result napisi ime funkcije... dakle: Code: function Sabiranje(A, B: Integer): Integer; begin   Sabiranje := A + B; end; Play Store Odgovor na temu

Toyo Član broj: 45193 Poruke: 227 *.kovnet.co.yu. +1 Profil Re: Zadatak u Turbo Pascalu, pomoć!!! 10.04.2005. u 22:46 - pre 231 meseci Nece ga ni nikada prepoznati. Moras da stavis umesto result:=, izaberipitanje:= Cekaj kad dodjes do ucitavanja pitanja iz fajla. Fajl je tekstualni a treba da ucitas tacan odgovor u byte :)) Odgovor na temu