mala slova u velika

[ Black @ 04.11.2002. 23:15 ] @

Zadatak glasi ovako:
Napisati proceduru koja mala slova niske X zamenjuje velikim. Ostali znakovi u nisci ostaju nepromenjeni.
Resenje bi trebalo da bude u pascalu.

[ Gojko Vujovic @ 05.11.2002. 00:33 ] @

Code:

var
  x : string;
  i : integer;
begin
  write('Unesi tu nisku: ');
  readln(x);
  for i := 1 to length(x) do
    x[i] := upcase(x[i]);
  writeln('Evo velikim slovima: ',x);
end.

[ broker @ 06.11.2002. 13:12 ] @

Gojko, prevideo si:

Ostali znakovi u nisci ostaju nepromenjeni.

[ Gojko Vujovic @ 06.11.2002. 13:27 ] @

Da li si ti uopšte probao program?

[ broker @ 06.11.2002. 18:48 ] @

Nema potrebe, može decko da dobije keca zato sto nema odgovarajuci if iako ti i ja ynam da je to nepotrebno :)

A možda dobije keca i već zbog toga što koristi upcase() :)

[ silverglider @ 07.11.2002. 00:21 ] @

Ako mu bas treba bez upcase funkcije, onda moze lako da koristi proveravanje ASCII koda znaka (funkcije ord i chr). Treba samo da se proveri da li slovo upada u interval a..z, pa ako upada, da mu oduzme 32, jer a..z idu od 97..122, a A..Z od 65..90.

Verujem da ste vi matori znali ovo i pre, napisao sam zbog decka :)

[ hodac @ 19.11.2002. 18:40 ] @

Mene zanima kako da ostam x sa indeksom 1(malo 1 iza x).

[ McKracken @ 19.11.2002. 20:32 ] @

Citat:

Mene zanima kako da ostam x sa indeksom 1(malo 1 iza x).

Ajd' sad ovo na srpskom ili nekom drugom opste prihvacenom jeziku...

Mozda mislis na subscript?

[ broker @ 19.11.2002. 23:53 ] @

Meni se čini da je ono "ostam" skraćeno od "odštampam" :)
Iz Pascala? Na koji štampač Hodaču?

[ hodac @ 20.11.2002. 23:23 ] @

Ma na monitoru, to jeste kako da iza x stoji malo jedan.

[ broker @ 20.11.2002. 23:34 ] @

To je u nekoj meri izvodljivo ako si napravio aplikaciju da radi u grafičkom režimu. Ako si u tekstualnom, to ti je što ti je.