MyCity » Pascal » zadatak

zadatak

Napisano na dan: 19.11.2012

zadatak
Sledeća strana Pagination

Idi na vrh

Poslao: 19 Nov 2012 08:59
Idi na vrh
offline
  • Pridružio: 22 Maj 2011
  • Poruke: 66

mozete li mi napisati zadatak koji prebrojava velika i mala slova u recenici



Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
Poslao: 19 Nov 2012 09:48
Idi na vrh
offline
  • Na odmoru xD
  • Na odmoru xD
  • Pridružio: 15 Feb 2012
  • Poruke: 430

PROGRAM MilsimStaRecixD; VAR   a:STRING;   x,b,velikaSlova,malaSlova:INTEGER; BEGIN   b := 0;   x := 0;   velikaSlova := 0;   malaSlova := 0;   WRITELN('Unesite recenicu:');   READLN(a);   b := LENGTH(a);   WHILE(x <= b) DO   BEGIN     IF( a[x] in ['A'..'Z'] ) THEN    BEGIN      velikaSlova := velikaSlova + 1;    END;    IF ( a[x] in ['a'..'z'] ) THEN    BEGIN      malaSlova := malaSlova + 1;    END;    x := x + 1;   END;   WRITELN(malaSlova);   WRITELN(velikaSlova);   READLN; END.



Poslao: 19 Nov 2012 14:47
Idi na vrh
offline
  • Pridružio: 22 Maj 2011
  • Poruke: 66

hvala puno dva dana se mucim xP poprilicno sam nepismen sto se tice paskala

MyCity » Pascal » zadatak

Ko je trenutno na forumu
 

Ukupno su 1135 korisnika na forumu :: 115 registrovanih, 11 sakrivenih i 1009 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 3466 - dana 01 Jun 2021 17:07

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: 4. Ozrenska, acov34, ajo baba, Albin0, Alexa77, Andrija357, Areal84, Asteker, Azzo, babaroga, bavar357, blatruc82, bobomicek, Bojan198527, Boris BM, bpvl, Bubimir, Centauro, Chainsaw, Cirkon, Dare, dearg, Demi87, Denaya, Dimitrise93, Dioniss, Django777, Dogma21, Dorcolac, draganl, Dragon Order, drale12, Electron, feanor, Feller, Frunze, gacesam, galerija, gomago, icemilos, ikan, ILGromovnik, Ilija Cvorovic, IvanMiletic, jalos, JOntra, Jose, kapela, Kaplar2, kNikS, KonstantinR, Kozara1, Krusarac, ladro, LjutaGuja, Makarid, maximir, Mi lao shu, MiG-29M2, milanpb, mile33, Miletić Zoran, MiroslavD, mocnijogurt, nazgul75, Ne doznajem se u oružje, Nomica, Pavle29L, pceklic, pein, Pekman, pera bager, pfc74, pisac12, Poof, Povratak1912, Razdroid, Rebel Frank, redstar72, Relixiran, Rogan33, Romibrat, royst33, ruma, Sančo, saputnik plavetnila, scout81, Seeker, sekretar, Singidunumac, Sir Budimir, sixpac, Soncogor, Sr.Stat., sslay, sspp, stagezin, stalja, tamno.nebo, tmanda323, Tribal, Tweety, Veless, Velički, vensla, vladaa012, voja64, vukan0799, Vzor50, Weah88, ZetaMan, zlatkoa987, ZlatniRez, Đurđevdan, 800077