Új hozzászólás Aktív témák

• #1270 cucka addikt Tangerine #1268

  Új Válasz 2006-05-22 14:22:39 #1270

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  cucka

  addikt

  válasz Tangerine #1268 üzenetére

  szorzás függvényed finoman szólva érdekes
  működni nyilván működik, de ez inkább csak számjeggyel való szorzásra alkalmas.
  ezekkel a függvényekkel egyébként elég egyszerű megírni a számrendszer átalakítást.
  
  a,e,h:string; {a:6os számrendszerbeli szám, e:eredmény, h:6 aktuális hatványa }
  i:integer;
  
  h:='1';e:='0';
  
  for i:=length(a) downto 1 do
  begin
  e:=osszead(e, szoroz(h, a[ i ]));
  h:=szoroz(h,6);
  end;
  
  
  
  [Szerkesztve]

• #1269 cucka addikt Tangerine #1268

  Új Válasz 2006-05-22 13:57:00 #1269

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  cucka

  addikt

  válasz Tangerine #1268 üzenetére

  6 hatványaiból elég csak az aktuálisat tárolni.
  kezdetben ugye 6^0=1-el szorzunk. utána 6^1=6-al utána 36, 216, stb.
  legyen egy változód (szintén nagyszám típusú), kezdőértéke legyen 1. minden egyes lépés után szorozd meg 6-al, így mindig meglesz az aktuális művelethez szükséges 6^x érték. kódodat hamarosan megnézem.

Új hozzászólás Aktív témák