Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Repeat untill pitanje

[es] :: Pascal / Delphi / Kylix :: Repeat untill pitanje

[ Pregleda: 4144 | Odgovora: 6 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

emiru
Emir Ugljanin
Novi Pazar

Član broj: 19526
Poruke: 126
*.verat.net

Sajt: www.autopijac.com


Profil

icon Repeat untill pitanje13.03.2004. u 12:42 - pre 243 meseci
Pocetnik sam u pascalu, interesuje me naredba za izvrsavanje programa, kada pretisnem ctrl F9 da mi ostane program,tj. da vidim kako radi.
cini mi se da je bila naredba repeat until keypressed ili tako nesto

 
Odgovor na temu

Bojan Basic
Novi Sad

SuperModerator
Član broj: 6578
Poruke: 3996
*.smin.sezampro.yu.

Jabber: bojan_basic@elitesecurity.org
ICQ: 305820253


+605 Profil

icon Re: Repeat untill pitanje13.03.2004. u 12:57 - pre 243 meseci
U zaglavlje programa stavi
Code:
uses crt;

pa onda možeš da upotrebiš naredbu koju si naveo.
Ljubičice crvena, što si plava kô zelena trava.
 
Odgovor na temu

Bojan Kopanja
Bojan Kopanja
Senior Web Developer, ZeusSoftware
Stara Pazova

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

ICQ: 346697685
Sajt: www.zeussoftware.rs


Profil

icon Re: Repeat untill pitanje14.03.2004. u 00:37 - pre 243 meseci
Imas i jednostavnije resenje, a to je koriscenje naredbe readln; na kraju programa (program ces prekidati na "Enter"), ili koriscenjem naredbe repeat until port[$60]=1; (u ovom slucaju program prekidas na "Escape").

Kada koristis neki od ova 2 nacina za prekidanje programa ne moras nista da dodajes u uses listu (ka sto si dodavao uses crt; kada si koristio repeat until keypressed).

p0z.
 
Odgovor na temu

Crazy Mix
Nemanja Avramovic
QuadraSoft
Mladenovac

Član broj: 7103
Poruke: 331
*.telekom.yu

ICQ: 266136396
Sajt: www.quadrasoft.co.sr


Profil

icon Re: Repeat untill pitanje16.03.2004. u 18:48 - pre 243 meseci
evo kako ja radim:
uses crt;
...
...
writeln('bla');
repeat
until keypressed;
 
Odgovor na temu

manefrenki
Mirso Mehic
RTV
Zavidovici

Član broj: 73216
Poruke: 39
80.65.66.*



Profil

icon Re: Repeat untill pitanje07.03.2006. u 20:37 - pre 218 meseci
ako neko moze da mi da adresu neke stranice gdje mogu da najdem nesto o naredbi repeat imam referat ali uopste o njoj nista ne znam
manefrenki
 
Odgovor na temu

Srki_82
Srdjan Tot
Me @ My Home
Ljubljana

Član broj: 28226
Poruke: 1403
82.208.201.*

ICQ: 246436949


+10 Profil

icon Re: Repeat untill pitanje07.03.2006. u 20:47 - pre 218 meseci
Zasto ne koristis Google?

Da ne zaboravim... imas i u help-u lepo objasnjenje.

[Ovu poruku je menjao Srki_82 dana 07.03.2006. u 21:50 GMT+1]
 
Odgovor na temu

Miloš Baić
Miloš Baić
ERP (Dynamics NAV) programer
Beograd

Član broj: 72468
Poruke: 1155
*.dialup.neobee.net.



Profil

icon Re: Repeat untill pitanje07.03.2006. u 23:16 - pre 218 meseci
Citat:
manefrenki: ako neko moze da mi da adresu neke stranice gdje mogu da najdem nesto o naredbi repeat imam referat ali uopste o njoj nista ne znam


Nemam adresu, ali nešto malo ti mogu reći o REPEAT naredbi.
Naredba ciklusa sa postuslovom repeat omogućava organizovanje ciklusa sa nepoznatim brojem ponavljanja.
Code:
repeat
  N1;
  N2;
  ...
  Nk
until
  L

N su naredbe, a L izraz. Ako je vrednost logičkog izraza iza until jednaka FALSE niz naredbi se ponavlja dok logički izraz ne dobije vrednost TRUE. Uslov se proverava posle svake iteracije. Rezervisane reči repeat i until su graničnici te ne treba unositi begin i end.
Jedan mali primer programa.
Napiši broj simbola različitih od praznine u ulaznoj datoteci. Čitanje ulazne datoteke prekinuti kada se dostigne kraj.
Code:
program simboli(input, output);
 var
   simbol: char;
   brojsimbola: integer;
 begin
   brojsimbola:=0;
   repeat
      read(simbol);
      if simbol<>' ' then
            brojsimbola:=brojsimbola + 1
   until
      eof;
      write('U datoteci ima:', brojsimbola, ' simbola!')
 end.

brojsimbola - promenljiva koja predstavlja brojač simbola;
simbol - promenljiva koja dobija vrednost tekućeg simbola...

Otprilike, ovo je nešto uopšteno, ali moraš se sam snaći za još zadataka da bi to baš lepo leglo gde je i mesto...

pozzz

[Ovu poruku je menjao loshmiscg dana 08.03.2006. u 00:21 GMT+1]
Someone's sitting in the shade today because someone planted a tree a long time ago.
 
Odgovor na temu

[es] :: Pascal / Delphi / Kylix :: Repeat untill pitanje

[ Pregleda: 4144 | Odgovora: 6 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.