[es] - Pretvaranje dijela stringa u char

peromalosutra
Ivan Rajkovic
PHP/MySQL programmer, Ogosense
Banjaluka

Član broj: 54774
Poruke: 431
*.dialup.blic.net.

Jabber: peromalosutra@elitesecurity.org
Sajt: computer-stuff.freehostia..

Profil

Pretvaranje dijela stringa u char

^{17.06.2005. u 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.

ivan@ivan-desktop:~$ ./encrypt.run
*** stack smashing detected ***: ./encrypt.run terminated
Aborted (core dumped)

^{17.06.2005. u 22:32}

Srki_82
Srdjan Tot
Me @ My Home
Ljubljana

Član broj: 28226
Poruke: 1402
82.208.201.*

ICQ: 246436949

Profil

Re: Pretvaranje dijela stringa u char

^{17.06.2005. u 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?

DirectX na srpskom | GLScene na srpskom

There are only 10 types of people in this world; those who understand binary and those who don't.

^{17.06.2005. u 22:39}

Passwd

Član broj: 54624
Poruke: 640
*.adsl.net.t-com.hr.

Profil

Re: Pretvaranje dijela stringa u char

^{17.06.2005. u 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.

^{17.06.2005. u 22:40}

ivanho
slobodni umetnik
Beograd

Član broj: 28465
Poruke: 73
217.26.75.*

Profil

Re: Pretvaranje dijela stringa u char

^{17.06.2005. u 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];

^{17.06.2005. u 22:45}

Re: Pretvaranje dijela stringa u char

^{17.06.2005. u 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.

ivan@ivan-desktop:~$ ./encrypt.run
*** stack smashing detected ***: ./encrypt.run terminated
Aborted (core dumped)

^{17.06.2005. u 22:53}

Passwd

Član broj: 54624
Poruke: 640
*.adsl.net.t-com.hr.

Profil

Re: Pretvaranje dijela stringa u char

^{17.06.2005. u 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?!?!

^{17.06.2005. u 22:55}

Re: Pretvaranje dijela stringa u char

^{17.06.2005. u 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.

ivan@ivan-desktop:~$ ./encrypt.run
*** stack smashing detected ***: ./encrypt.run terminated
Aborted (core dumped)

^{17.06.2005. u 22:56}

Re: Pretvaranje dijela stringa u char

^{17.06.2005. u 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.

ivan@ivan-desktop:~$ ./encrypt.run
*** stack smashing detected ***: ./encrypt.run terminated
Aborted (core dumped)

^{17.06.2005. u 22:59}

Re: Pretvaranje dijela stringa u char

^{17.06.2005. u 23:02}

Dakle moje pitenje je: da li se ime (a varijabla ime je string) ponasa kao varijabla iz tipa char?

ivan@ivan-desktop:~$ ./encrypt.run
*** stack smashing detected ***: ./encrypt.run terminated
Aborted (core dumped)

^{17.06.2005. u 23:02}

Passwd

Član broj: 54624
Poruke: 640
*.adsl.net.t-com.hr.

Profil

Re: Pretvaranje dijela stringa u char

^{17.06.2005. u 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!!

^{17.06.2005. u 23:12}

Srki_82
Srdjan Tot
Me @ My Home
Ljubljana

Član broj: 28226
Poruke: 1402
82.208.201.*

ICQ: 246436949

Profil

Re: Pretvaranje dijela stringa u char

^{17.06.2005. u 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.

DirectX na srpskom | GLScene na srpskom

There are only 10 types of people in this world; those who understand binary and those who don't.

^{17.06.2005. u 23:33}