Prijava na forum:
Ime:
Lozinka:
Prijavi me trajno:
Trajanje:
Registruj nalog:
Ime:
Lozinka:
Ponovi Lozinku:
E-mail:

ConQUIZtador
Trenutno vreme je: 27. Apr 2024, 11:54:21
nazadnapred
Korisnici koji su trenutno na forumu 0 članova i 1 gost pregledaju ovu temu.

 Napomena: Za sva pitanja u vezi kupovine novog hardware-a ili procene vrednosti i preporuke koristite - ovu temu

Spyware,sta je,kako radi,kako se zastititi? :: Kako rade mreze :: Burek Anti-virus software review :: Index tema koje ne treba propustiti

Idi dole
Stranice:
Počni novu temu Nova anketa Odgovor Štampaj Dodaj temu u favorite Pogledajte svoje poruke u temi
Tema: Pomoc oko Delphi zadatka  (Pročitano 2018 puta)
20. Maj 2009, 17:09:36
Poznata licnost


Život je igra u kojoj ne postoji save game

Zodijak Cancer
Pol Muškarac
Poruke 2544
Zastava ko zna kad i ko zna gde
OS
Windows Vista
Browser
Mozilla Firefox 3.0.10
mob
SonyEricsson W950, Z1010
Kreirati aplikaciju koja u kontroli ListBox ispisuje kvadrate svih prirodnih brojeva do 1000, a u drugoj ListBox kontroli korene svih prirodnih brojeva do 1000. Ispis kvadrata i korena vrsi se klikom na odgovarajuce dugme.
Evo dokle sam stigao.

Citat
var i:integer;
s,t:string;
begin
s:='';
i:=1;
repeat
begin
str(i,t);
s:=s+' '+t;
i:=i+1;
end;
until i>1000;
edit1.text:=s;
end;
end.

Time mi se ispisuju samo prirodni brojevi do 1000, ali ne i njihovi kvadrati, odnosno koreni sto meni treba. Verovatno treba da se ubaci negde brojac, ali nikako da provalim gde i sta da otkucam. Na kraju sam stavio da mi se rezultat ispisuje u Edit-u, ajer ne znam kako da namestim da se ispisuje u listbox-u.

[Edit by okno: Pisanje poruka zaredom je protiv pravila Burek Foruma, jer se na taj nacin narusava tok diskusije, a preglednost i kvalitet teme znacajno smanjuju.]
« Poslednja izmena: 20. Maj 2009, 19:21:22 od okno »
IP sačuvana
social share
Pogledaj profil WWW
 
Prijava na forum:
Ime:
Lozinka:
Zelim biti prijavljen:
Trajanje:
Registruj nalog:
Ime:
Lozinka:
Ponovi Lozinku:
E-mail:
Svedok stvaranja istorije


42

Zodijak Aquarius
Pol Muškarac
Poruke 26656
Zastava Restoran na kraju vaseljene
OS
Windows XP
Browser
Mozilla Firefox 3.0.10
mob
Nokia 6630, valjda
Druze to uopshte nije teshko, prochitaj neki tutorijal, taman cesh da nauchish neshto shto ce ti mozda koristiti... osim toga teshko da ce neko da ti odradi domaci...
IP sačuvana
social share
“The mind commands the body and it obeys. The mind orders itself and meets resistance.”
Pogledaj profil
 
Prijava na forum:
Ime:
Lozinka:
Zelim biti prijavljen:
Trajanje:
Registruj nalog:
Ime:
Lozinka:
Ponovi Lozinku:
E-mail:
Poznata licnost


Život je igra u kojoj ne postoji save game

Zodijak Cancer
Pol Muškarac
Poruke 2544
Zastava ko zna kad i ko zna gde
OS
Windows Vista
Browser
Mozilla Firefox 3.0.10
mob
SonyEricsson W950, Z1010
Znam da nije tesko, malo sam zaboravio. Pre sam znao iz keca, nego me drugarica zamolila da joj pomognem, a bas i nemam mnogo vremena da trazim na netu.
IP sačuvana
social share
Pogledaj profil WWW
 
Prijava na forum:
Ime:
Lozinka:
Zelim biti prijavljen:
Trajanje:
Registruj nalog:
Ime:
Lozinka:
Ponovi Lozinku:
E-mail:
Svedok stvaranja istorije


42

Zodijak Aquarius
Pol Muškarac
Poruke 26656
Zastava Restoran na kraju vaseljene
OS
Windows XP
Browser
Mozilla Firefox 3.0.10
mob
Nokia 6630, valjda
Ja eventualno mogu da ti dam listing u C# Smile ili chek da vidim da li je kolega tu pa da ti odradi zadatak Smile
IP sačuvana
social share
“The mind commands the body and it obeys. The mind orders itself and meets resistance.”
Pogledaj profil
 
Prijava na forum:
Ime:
Lozinka:
Zelim biti prijavljen:
Trajanje:
Registruj nalog:
Ime:
Lozinka:
Ponovi Lozinku:
E-mail:
Svedok stvaranja istorije


☐ worth ☑ not worth

Zodijak Cancer
Pol Muškarac
Poruke 23430
Zastava
OS
Windows XP
Browser
Mozilla Firefox 3.0.10
mob
Tel.Me Your.Number
Umesto sqrt treba da ide sqr za kvadrat ali meni delphi uopšte neće to da odradi, ne kapiram u čemu je problem.
Ova procedura je za izračunavanje korena. I ovo je sve u jednom ListBoxu

Kod:
procedure TForm1.FormCreate(Sender: TObject);
  var i:integer;
begin
ListBox1.Clear;
for i:=1 to 100 do
   ListBox1.Items.Add(Format('%5d:%10f',[i,sqrt(i)]))
   end;

end.
IP sačuvana
social share
Pogledaj profil
 
Prijava na forum:
Ime:
Lozinka:
Zelim biti prijavljen:
Trajanje:
Registruj nalog:
Ime:
Lozinka:
Ponovi Lozinku:
E-mail:
Idi gore
Stranice:
Počni novu temu Nova anketa Odgovor Štampaj Dodaj temu u favorite Pogledajte svoje poruke u temi
Trenutno vreme je: 27. Apr 2024, 11:54:21
nazadnapred
Prebaci se na:  

Poslednji odgovor u temi napisan je pre više od 6 meseci.  

Temu ne bi trebalo "iskopavati" osim u slučaju da imate nešto važno da dodate. Ako ipak želite napisati komentar, kliknite na dugme "Odgovori" u meniju iznad ove poruke. Postoje teme kod kojih su odgovori dobrodošli bez obzira na to koliko je vremena od prošlog prošlo. Npr. teme o određenom piscu, knjizi, muzičaru, glumcu i sl. Nemojte da vas ovaj spisak ograničava, ali nemojte ni pisati na teme koje su završena priča.

web design

Forum Info: Banneri Foruma :: Burek Toolbar :: Burek Prodavnica :: Burek Quiz :: Najcesca pitanja :: Tim Foruma :: Prijava zloupotrebe

Izvori vesti: Blic :: Wikipedia :: Mondo :: Press :: Naša mreža :: Sportska Centrala :: Glas Javnosti :: Kurir :: Mikro :: B92 Sport :: RTS :: Danas

Prijatelji foruma: Triviador :: Domaci :: Morazzia :: TotalCar :: FTW.rs :: MojaPijaca :: Pojacalo :: 011info :: Burgos :: Alfaprevod

Pravne Informacije: Pravilnik Foruma :: Politika privatnosti :: Uslovi koriscenja :: O nama :: Marketing :: Kontakt :: Sitemap

All content on this website is property of "Burek.com" and, as such, they may not be used on other websites without written permission.

Copyright © 2002- "Burek.com", all rights reserved. Performance: 0.073 sec za 16 q. Powered by: SMF. © 2005, Simple Machines LLC.