[es] - samo malkice -jedna komanda u kodu

atlas

Član broj: 20158
Poruke: 167
*.as54.ze.bih.net.ba.

Profil

^{04.01.2006. u 22:49}

Toyo ga je davno postavio.............

sta mu je ovo inttostr

Code:

function Nadji(b,d, prec : Integer):String;
var i, j: Integer;
  s:String;
begin
  s:= inttostr(b div d)+'.';
  i := 0;
  b := b mod d;
  while i <= prec do
    begin
      b := b*10;
      s := s+ inttostr(b div d);
      b := b mod d;
      inc(i);
    end;
  Nadji := S;
end;

Zoves sa Nadji(1,3,200)
Daje string 1/3 na 200 decimala.
ili Nadji(22,7,155)
ovo daje 22/7 na 155 decimala.

^{04.01.2006. u 22:49}

ntojzan
Sandor II Tojzan
Becej

Član broj: 36657
Poruke: 167
*.bbtec.net.

Profil

Re: samo malkice -jedna komanda u kodu

^{04.01.2006. u 23:57}

IntToStr je komanda koja omogucuje konverziju integer vrednosti u string. ;)

^{04.01.2006. u 23:57}

osmica
Beograd

Član broj: 38009
Poruke: 74
*.smin.sezampro.yu.

Sajt: www.imagenedthe.com

Profil

Re: samo malkice -jedna komanda u kodu

^{05.01.2006. u 02:38}

Pogledaj ovo dole moze da ti pomogne! :)
Pozzzz

Ivan :)

Prikačeni fajlovi

Pascal.rar - 199.66k

^{05.01.2006. u 02:38}

osmica
Beograd

Član broj: 38009
Poruke: 74
*.smin.sezampro.yu.

Sajt: www.imagenedthe.com

Profil

Re: samo malkice -jedna komanda u kodu

^{05.01.2006. u 02:46}

e kad si skinuo predhodni fajl skini i ovaj i ubaci ga u folder ch11 od fajla sto si malo pre skinuo!
Pozzzz

_{[Ovu poruku je menjao osmica dana 05.01.2006. u 03:51 GMT+1]}

Ivan :)

Prikačeni fajlovi

images.rar - 173.93k

^{05.01.2006. u 02:46}

atlas

Član broj: 20158
Poruke: 167
*.as.ka.bih.net.ba.

Profil

Re: samo malkice -jedna komanda u kodu

^{05.01.2006. u 11:32}

A u redu je to inttostr (convert integer to string) a komanda je str(int,str);
pa evo koda:::::

Code:

program na_decimale (input,output);
uses crt;
var b,d,dec:longint;
function Nadji(b,d,dec:Integer):String;
var i,j,e: Integer;
   s,inttostr,a:String;
begin
  str((b div d),inttostr);
  s:=inttostr+',';
  i := 0;
  b := b mod d;
  while i<dec do
    begin
      b:=b*10;
      e:=b div d;
      str(e,a);
      s:=s+a;
      b:=b mod d;
      inc(i);
    end;
  Nadji:=S; readln;
end;
begin
clrscr;
write('DJELJENIK= ');
read(b);writeln;
write('djelilac= ');
read(d); writeln;
write('na kolko decimala= ');
read(dec);writeln;
writeln('REZULTAT');
WRITELN;
writeln(b,'/',d,' na ',dec,' decimala je ');
writeln;
write(nadji(b,d,dec));
writeln;
writeln('                      "ENTER"'); READLN;
end.

Osmica hvala na knizi

^{05.01.2006. u 11:32}

osmica
Beograd

Član broj: 38009
Poruke: 74
*.smin.sezampro.yu.

Sajt: www.imagenedthe.com

Profil

Re: samo malkice -jedna komanda u kodu

^{05.01.2006. u 13:03}

Str ti je funkcija ili procedura,nemogu se setim,koja konvertuje bilo koji tip integera
u string.

Code:
str((b div d),inttostr);

ovde ti se (b div d) konvertuje u string i cuva promenjivi inttostr!
Pozzzzzzz

Ivan :)

^{05.01.2006. u 13:03}

Nemanja Avramović
PHP developer, Webinsane
Beograd, Srbija

Član broj: 32202
Poruke: 4169
*.internet.krstarica.net.

ICQ: 266136396
Sajt: avr.am

Profil

Re: samo malkice -jedna komanda u kodu

^{05.01.2006. u 15:53}

Zamena je StrToInt (barem u Delphiju)

Moj sajt. Engleski?.Moj blog. Moj avatar.

_{[NE PRUŽAM PODRŠKU ZA PHP PREKO PRIVATNIH PORUKA!]}

^{05.01.2006. u 15:53}

ntojzan
Sandor II Tojzan
Becej

Član broj: 36657
Poruke: 167
*.bbtec.net.

Profil

Re: samo malkice -jedna komanda u kodu

^{05.01.2006. u 23:55}

Napomena: za StrToInt je potrebno ukljuciti i StrUtils u uses listi.

^{05.01.2006. u 23:55}

Nemanja Avramović
PHP developer, Webinsane
Beograd, Srbija

Član broj: 32202
Poruke: 4169
*.internet.krstarica.net.

ICQ: 266136396
Sajt: avr.am

Profil

Re: samo malkice -jedna komanda u kodu

^{06.01.2006. u 13:37}

u delphiju to sve samo ide

Moj sajt. Engleski?.Moj blog. Moj avatar.

_{[NE PRUŽAM PODRŠKU ZA PHP PREKO PRIVATNIH PORUKA!]}

^{06.01.2006. u 13:37}