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 3077 korisnika na forumu :: 60 registrovanih, 5 sakrivenih i 3012 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: A.R.Chafee.Jr., aleksmajstor, AMX72, aramis s, Avalon015, Bbbggg1979, braca57, Bubimir, burevesnik, Chainsaw, chichabg, cyprus, dd201176, dekao, Denaya, djordjemiklusev, dmitarche, dolinalima, Electron, Gitzherai, goran.vvv, GveX, Hans Gajger, Haris, ikan, ILGromovnik, Ir, jarovitt, JOntra, Jovan1983, Kalem, kibihrchak, Koca Popovic, korin911, Kriglord, Lošmi, mercedesamg, milanpb, milenko crazy north, mm1811, nikolapetkovic, nikoli_ca, pein, Pekman, raptorsi, RD84, repac, SamoGledam, Srdjadj70, sspp, tomo2, TripleTwo, ujke, Vanderx, vidra1, voja64, Wehicle, XBMC, Yugol33, zdrebac