[ peromalosutra @ 17.06.2005. 22:32 ] @
Na koji nacin mogu da string IME koji se sastoji od znakova( slova) podjelim na niz znakova (slova) iz tipa char, na primjer:

Code:

IME: IVAN
slovo[1]=I
slovo[2]=V
slovo[3]=A     
slovo[4]=N


Pokusao sam na sledeci nacin
Code:

for i:=1 to length(ime) do
   slovo[i]:=copy(ime,i,1);

ali funkcija copy daje takodje vrijednost u stringu.
[ Srki_82 @ 17.06.2005. 22:39 ] @
Ne razumem te bas najbolje... Kad napises
Code:
var
  S: String;
begin
  S := 'Pera';
end.

Tada ti je u S[1] karakter P u S[2] karakter 'e' i tako dalje.
Mislim... sta ti tacno treba?
[ Passwd @ 17.06.2005. 22:40 ] @
Evo:
Code:

program ivan;
uses crt;
var x:integer;
    ime:string;
begin
clrscr;
readln(ime);
for x:=1 to length(ime) do begin
writeln('Slovo[',x,']:',ime[x]);
end;
readln;
end.

[ ivanho @ 17.06.2005. 22:45 ] @
Mozes string da posmatraz kao niz promenjivih tipa char

Code:
var
 strTest: string;
 arrchrTest: array of char;
 intBrojac: integer;
begin
  strTest:='Ivan';
  SetLength(arrchrTest,length(strTest));
  for intBrojac:= 0 to length(strTest)-1 do
    arrchrTest[intBrojac]:=strTest[intBrojac];
[ peromalosutra @ 17.06.2005. 22:53 ] @
Mozda nisam bio najjasniji. Hocu da neki string razlozim na znakove i da ti znakovi budu iz tipa char. Ne znam kako drugacije da vam objasnim.
[ Passwd @ 17.06.2005. 22:55 ] @
Pa ako zelis dobit ovo:
IME: IVAN
slovo[1]=I
slovo[2]=V
slovo[3]=A
slovo[4]=N

Onda ti radi onaj program to??
Ne kuzim?!?!
[ peromalosutra @ 17.06.2005. 22:56 ] @
Code:

Program pretvaranje;
Var ime:string;
  znak:array[1..100] of char;
begin
ime:='Pera';
for i:=1 to length(ime) do
   begin
   slovo[i]:=copy(ime,i,1);
   writeln (i,'. slovo je ',znak[i]);
   end;
end.



Nesto otprilike ovako.
[ peromalosutra @ 17.06.2005. 22:59 ] @
Da shvatam sta si napisao Passwd, ali da li mogu da sa tako dobijenim znakom vrsim sve operacije kao sa varijablom iz tipa char. Na primjer, radi li:
var ime:string;
i:integer;
begin
i:=ord(ime[1]);
end.
[ peromalosutra @ 17.06.2005. 23:02 ] @
Dakle moje pitenje je: da li se ime (a varijabla ime je string) ponasa kao varijabla iz tipa char?
[ Passwd @ 17.06.2005. 23:12 ] @
Moze!!
Ali uvijek moras upotrebljavat petlju for!!

Code:

program veliko_slovo;
uses crt;
var x:integer;
     rijec:string;
begin
clrscr;
readln(rijec);
for x:=1 to length(rijec) do
begin
write(UpCase(rijec[x]));
end;
readln;
end.


Znaci UpCase radi sa char ali ako smo uveli petlju for radi i sa string..
Znaci bitno je da se ucitava jedno po jedno slovo/znak od stringa!!
[ Srki_82 @ 17.06.2005. 23:33 ] @
Mozes uvek da napises nesto ovako
Code:
case Char(Ime[2]) of
  'I': ...
  'V':...
  .
  .
  .
end;

Samo bilo koji element stringa kastuj u Char i mora da radi, mada, koliko znam trebalo bi da radi i bez kastovanja.