zadatak

zadatak

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.
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.



offline
  • Pridružio: 22 Maj 2011
  • Poruke: 66

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

Ko je trenutno na forumu
 

Ukupno su 782 korisnika na forumu :: 54 registrovanih, 8 sakrivenih i 720 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 20624 - dana 04 Apr 2026 04:18

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: 04bokibole, AirSremac, airsuba, Aleksandar1991, bavar357, Ben Roj, bilisrbija, BLACKBIRD201284, Bobrock1, bolimejoli, Colt D, cuvarkuca, Darth Wader, Devil city 1989, dmarx1, Dragan7777, Ercomero, FOX, galerija, glados, goran.vvv, Goxy1, hatman, HrcAk47, Imperator_Aleksandr_lll, king111, kulus, LjubisaR, lucianovercetti, mercedesamg, Mickey91, miki kv, Millennium, milutin134, moldway, Mrav Obrad, nuke92, paja69, Parker, pein, peradetlić, S2M, SamoGledam, SlaKoj, ssekir75, Stevan Visoki, Toper, vathra, Velizar Laro, Vlado82, Vojkan Petrovic, xAlex2, zexon, zillbg