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

• #16769 janos1988 addikt

  Új Válasz 2021-12-07 18:59:08 #16769

  Ú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

  

  janos1988

  addikt

  https://raketa.hu/melyik-projekt-all-tobb-kodsorbol-egy-dvd-lejatszoe-vagy-egy-f22-raptor-fedelzeti-szamitogepe

• #14311 janos1988 addikt Create. #14305

  Új Válasz 2020-05-26 16:46:27 #14311

  Ú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

  

  janos1988

  addikt

  válasz Create. #14305 üzenetére

  Nálam még nem érhető el a tanyanyag.

• #14219 janos1988 addikt opr #14214

  Új Válasz 2020-05-06 20:34:06 #14219

  Ú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

  

  janos1988

  addikt

  válasz opr #14214 üzenetére

  Engem kiráz a hideg a C nyelvtől. Annyira fapados, de legalább cserébe, ha nem figyelsz nagy az esélye, hogy elbaszol mindent

  Mondom ezt, azután, hogy végig néztem vagy 3 hét alatt ezt a lejátszási listát, de nem sikerült megkedvelnem.

  De kell foglalkozni vele, ha az ember a Java nyelvre akar koncentrálni (Android).

  Ezekiell: Köszi a listát, ráállok majd.

• #14181 janos1988 addikt vz12 #14180

  Új Válasz 2020-04-24 16:12:45 #14181

  Ú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

  

  janos1988

  addikt

  válasz vz12 #14180 üzenetére

  Köszi.

  De amúgy rácsodálkozok még most is, hogy milyen zseniális megoldást írtál, lekezeltél vele mindent röviden és tömören. Nekem még csak hasonló sem jutott volna eszembe. Igaz 1 hónap után mit vár az ember... Hiába tervezném meg előtte papíron 5x 5 féleképpen, egyik sem lenne ennyire rövid, tömör, logikus és magától értetődő.

• #14179 janos1988 addikt janos1988 #14178

  Új Válasz 2020-04-23 16:41:54 #14179

  Ú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

  

  janos1988

  addikt

  válasz janos1988 #14178 üzenetére

  Kisebb sikerélmény, sikerült megoldani a szóközöket.

  program szoveg_bontas;
function bontas(s1:string;var pos1:integer):string;
begin
    bontas:='';
    while (s1[pos1]<>#32) and (pos1<>length(s1)+1) do
        begin
            bontas:=bontas+s1[pos1];
            inc(pos1);
        end;
    if s1[pos1]=' ' then inc(pos1);
end;
var
    s2,s3:string;
    pos2,t,i:integer;
    tomb:array [1..10] of string;
begin
    pos2:=1;
    t:=1;
    s2:='   Ez   megint egy szep hosszu proba    mondat.';
    
    repeat
        s3:=bontas(s2,pos2);
        if s3<>'' then
                   begin
                     tomb[t]:=s3;
                     inc(t);
                   end;
    until pos2>length(s2);
    
    for i:=1 to t do writeln(tomb[i]);
end.

• #14178 janos1988 addikt vz12 #14177

  Új Válasz 2020-04-23 15:59:30 #14178

  Ú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

  

  janos1988

  addikt

  válasz vz12 #14177 üzenetére

  Az ilyen megoldásokon csak pislogok. Messze vagyok még az ilyen kivitelezéstől.
  A több szóköz opcióra nem is gondoltam...
  Amúgy mi ez a +1 -1 fétis? Valami programozásbeli trükk? Mert érdekes, hogy elméletileg balansz van -1 és +1 között, de ha kitörlöm ezeket akkor mégis megbomlik az egyensúly és káosz lesz. Érdekes.
  Hogy ha valamivel dolgozni akarsz akkor érdemes mindig egy átmeneti változóba másolni a tartalmát, mintsem hogy az eredetivel dolgozz?
  A tömböt ajánlott mindig feltölteni? Ne bízz a rendszerben elv végett
  Illetve a "delete(tmp,1,length(szo)+1)" helyett mehet a "delete(tmp,1,pos1)" is? Végül is működik.
  Egyelőre ennyi

  Amúgy meg elméletileg az enyémbe át kellene ugrania a szóközöket tárolás nélkül, de a gyakorlatban nem úgy működik.

• #14175 janos1988 addikt janos1988 #14174

  Új Válasz 2020-04-22 22:51:47 #14175

  Ú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

  

  janos1988

  addikt

  válasz janos1988 #14174 üzenetére

  A temps-re nincs is szükség és 2 komment.

  program szoveg_bontas;

  function bontas(s1:string;var pos1:integer):string;
begin
    bontas:='';
  while (s1[pos1]<>#32) and (pos1<>length(s1)+1) do //a . lemarad ha nincs +1
        begin
            bontas:=bontas+s1[pos1];
            inc(pos1);
        end;
    inc(pos1); //szokoz (#32) atugrasa
end;

  var
    s2:string;
    pos2,t,i:integer;
    tomb:array [1..10] of string;

  begin
    pos2:=1;
    t:=0;
    s2:='Ez megint egy szep hosszu proba mondat.';
    
    repeat
        inc(t);
        tomb[t]:=bontas(s2,pos2);
    until pos2>length(s2);
    
    for i:=1 to t do writeln(tomb[i]);
end.

• #14174 janos1988 addikt

  Új Válasz 2020-04-22 22:19:01 #14174

  Ú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

  

  janos1988

  addikt

  Viszont elkészült a szétbontó program. Próbáltam máshogy és/vagy egyszerűbben megoldani, de nem ment, ennyire telik tőlem egyelőre.

  program szoveg_bontas;

function bontas(s1:string;var pos1:integer):string;
var
    temps:string;
begin
    temps:='';
    while (s1[pos1]<>#32) and (pos1<>length(s1)+1) do 
        begin
            temps:=temps+s1[pos1];
            inc(pos1);
        end;
    bontas:=temps;
    inc(pos1);
end;

var
    s2:string;
    pos2,t,i:integer;
    tomb:array [1..10] of string;

begin
    pos2:=1;
    t:=0;
    s2:='Ez megint egy szep hosszu proba mondat.';
    repeat
        inc(t);
        tomb[t]:=bontas(s2,pos2);
    until pos2>=length(s2);
    for i:=1 to t do writeln(tomb[i]);
end.

• #14173 janos1988 addikt bambano #14165

  Új Válasz 2020-04-22 22:18:19 #14173

  Ú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

  

  janos1988

  addikt

  válasz bambano #14165 üzenetére

  Értem, köszi. Próbálok odafigyelni erre is.

• #14162 janos1988 addikt janos1988 #14161

  Új Válasz 2020-04-21 22:11:20 #14162

  Ú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

  

  janos1988

  addikt

  válasz janos1988 #14161 üzenetére

  Ez az egész arra kellett, hogy ha egy fájlból beolvasom a sorokat (#10#13) akkor azt szét tudjam bontani és a szeparált adatokat a rekord megfelelő mezőibe bemásolni. De közben rájöttem, hogy ez nem lesz annyira egyszerű. Addig, oké, hogy szétszedem a sort, de, hogy mondom meg neki, hogy az első szétszedett részt rakja be a rekord első/megfelelő mezőjébe és így tovább... Fejben már vannak tervek, hogy kettészedem a szeparálós algoritmust két függvénybe és a visszatérési értékét fogom megadni a rekord egyes mezőibe, de hogy ez mennyire fog működni a gyakorlatban... De ez már a holnapi feladat lesz. De "léci" egyelőre ne adjatok tippeket, küszködni akarok vele.

• #14161 janos1988 addikt kovisoft #14157

  Új Válasz 2020-04-21 21:53:40 #14161

  Ú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

  

  janos1988

  addikt

  válasz kovisoft #14157 üzenetére

  Végül is így sikerült közben megoldani (illetve ezek más "elrendezése" és/vagy a while do ciklus használata, de a végeredmény ua):

  program felbontas;
var
    s1,s2:string;
    i:integer;
begin
    s1:='Ez egy szep hosszu proba mondat akarna lenni.';
    s2:='';
    for i:=1 to length(s1) do
        begin
            if (s1[i]<>#32) then s2:=s2+s1[i]
                            else
                                begin
                                    writeln(s2);
                                    s2:='';
                                end;
            if i=length(s1) then writeln(s2);
        end;
end.

  Közben olvasgattam és beugrott, hogy van a C-ben használatos 0 végű sztring is a Pascalban (PChar), de azzal is hasonló megoldások születnek (születtek). Bár előnye, hogy meghatározható a vége (#0). Köszi neked is és a többieknek is!

• #14153 janos1988 addikt janos1988 #14151

  Új Válasz 2020-04-21 12:14:57 #14153

  Ú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

  

  janos1988

  addikt

  válasz janos1988 #14151 üzenetére

  A . lemaradása már megvan, mert ha a for ciklus elér a 45. lefutáshoz akkor i<>45 hamis (mivel i=45) lesz így már a feltétel is hamis lesz, azaz else ág. Na de, hogy tudom mégis kiíratni.

  Szerk.: Ha a for ciklushoz hozzáadok egyet for i:=1 to length(s1)+1 és a kiértékeléshez is (i<>length(s1)+1) akkor minden okés. De szerintem ezt nem így kell(ene) megoldani, hogy túlfuttatom a cilust.

• #14152 janos1988 addikt janos1988 #14151

  Új Válasz 2020-04-21 11:55:42 #14152

  Ú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

  

  janos1988

  addikt

  válasz janos1988 #14151 üzenetére

  Pedig ellenőriztem is. 45 karakter hosszúságú a sztring. 1. eleme "E" a 45. ".". Tehát s[1] az első index.

• #14151 janos1988 addikt

  Új Válasz 2020-04-21 11:48:32 #14151

  Ú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

  

  janos1988

  addikt

  Próbáltam magamtól egy mondatot feldarabolni de nem megy, csak vakarom a fejem.

  Ha így csinálom, akkor lemarad a "lenni." rész:

  program felbontas;
var
    s1,s2:string;
    i:integer;
begin
    s1:='Ez egy szep hosszu proba mondat akarna lenni.';
    s2:='';
    for i:=1 to length(s1) do
        begin
            if s1[i] <> #32 then s2:=s2+s1[i]
                            else
                                begin
                                    writeln(s2);
                                    s2:='';
                                end;
        end;
end.

  Ha így próbálom, akkor pedig a ".":

  program felbontas;
var
    s1,s2:string;
    i:integer;
begin
    s1:='Ez egy szep hosszu proba mondat akarna lenni.';
    s2:='';
    for i:=1 to length(s1) do
        begin
            if (s1[i]<>#32) and (i<>length(s1))
                    then s2:=s2+s1[i]
                    else
                        begin
                            writeln(s2);
                            s2:='';
                        end;
        end;
end.

• #14118 janos1988 addikt Create. #14117

  Új Válasz 2020-04-19 11:51:27 #14118

  Ú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

  

  janos1988

  addikt

  válasz Create. #14117 üzenetére

  Maga a stílus sem túl megnyerő. Nem beszélve a videóban elkövetett hibákról, amik tényleg banálisak egy "oktatótól".

  Viszont felnéztem az általad említett Webler oktatóstúdió weboldalára. Pl. a szoftverfejlesztő okj viszonylag jónak tűnik, tematikája is tetszik*, de nekem az ilyenekkel két bajom van. Csak heti 2 alkalommal van oktatás és ezáltal nagyon elnyújtják a képzési időt (fölöslegesen), másik maga az igazi gyakorlati rész, ahol közösen el kezdenek fejlesztenek egy alkalmazást a kurzus végén (2-3 hét), hogy összeálljon a kép és egy kis gyakorlatot is szerezzenek. Ahhoz hasonlítanám az ilyet, mint amikor a b kategóriás jogosítványt megszerzed úgy, hogy a sikeres elméleti vizsgákat teljesítetted, meg mentetek az oktatóval 2-3 kört a rutinpályán, aztán ég veled. A többit majd a forgalomban megtanulod, hisz az elméleti rész már ott van a fejben.

  * Igazából ha végignézd a tematikát, semmi olyan extra nincs benne amit te magad néhány könyvből és a tengernyi sok ingyenesen elérhető oktatóvideóból ne tudnál megtanulni.

• #14116 janos1988 addikt Create. #14111

  Új Válasz 2020-04-19 08:31:25 #14116

  Ú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

  

  janos1988

  addikt

  válasz Create. #14111 üzenetére

  Én is szemezgettem az ilyen gyorstalpalókkal, de kis utánaolvasás (gyik) után lebeszéltem magam róla.

  Ha ez a videó az első nap első órájában készült, még akkor is úgy jön le, mintha egy félúton kibukott hipszter "egyetemista" tartaná az előadást sörözés közben. Az "oktató" még a végtelen ciklusba is belefut az 5 soros programjában...

  GitHub feltöltéseikbe is bele nézegettem. 10. héten még mindig alap dolgokkal futottam össze, pedig ha az ember önképez otthon videók és pdf-ek által, már kicsit összetettebb programokkal is meg kellene, hogy birkózzon. Nem azt mondom, hogy nem tanulsz semmit sem ha elvégzed, de annyi pénzért amennyibe kerül, az átadott tudás nagyon kevés és akkor még ott vannak a feltételek is, ha nem sk-n végzed el.

• #14086 janos1988 addikt janos1988 #14084

  Új Válasz 2020-04-16 13:13:05 #14086

  Ú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

  

  janos1988

  addikt

  válasz janos1988 #14084 üzenetére

  Vagyis de, egy kis trükkel, de ez már nem eljárás, hanem függvény.

  function vicc(n:integer):boolean;
begin
    if n<=0 then vicc:=false
            else
                begin
                    writeln(n);
                    vicc(2*n);
                    writeln(n);
                end;
end;

• #14084 janos1988 addikt Silεncε #14080

  Új Válasz 2020-04-16 12:55:22 #14084

  Ú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

  

  janos1988

  addikt

  válasz Silεncε #14080 üzenetére

  Akkor átírva ez így jó? Vagyis jó, mert működik. De a <= verziót (a C-set) nem tudom leírni pascal nyelven úgy, hogy ne használjak csúnyaságot, pl. break.

  procedure vicc(n:integer);
begin
    if n>=0 then 
                begin
                    writeln(n);
                    vicc(2*n);
                    writeln(n);
                end;
end;

• #14079 janos1988 addikt

  Új Válasz 2020-04-16 11:44:09 #14079

  Ú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

  

  janos1988

  addikt

  Nem igazán foglalkoztam a C nyelvvel, de ezt kipróbáltam (oktató videóban láttam). Azt hittem, hogy végtelen ciklusba megy át, de nem. Nem értem. Vagy csak arról van szó, hogy a C-ben a túlcsordulás=0 és akkor elkezdenek vissza térni szépen a meghívott függvények?

  

• #14041 janos1988 addikt Reflax #14039

  Új Válasz 2020-04-14 16:39:56 #14041

  Ú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

  

  janos1988

  addikt

  válasz Reflax #14039 üzenetére

  Ezek szerint a játék készítés tetszik. Hajrá! Maradj ennél, és ebbe mélyedj el. Mire befejezed az egyetemet és a lelkesedésed is mindvégig megmarad, valószínűleg fel fogsz tudni mutatni 2-3 komolyabb saját alkotást is, ami azért már elég jól fog mutatni az önéletrajzodban.

• #14038 janos1988 addikt janos1988 #14037

  Új Válasz 2020-04-13 23:29:41 #14038

  Ú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

  

  janos1988

  addikt

  válasz janos1988 #14037 üzenetére

  *és ez még csak az alap.

• #14037 janos1988 addikt Reflax #14030

  Új Válasz 2020-04-13 23:19:04 #14037

  Ú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

  

  janos1988

  addikt

  válasz Reflax #14030 üzenetére

  Én, mint egyszerű ember azt mondom neked, hogy ha mindenhez akarsz érteni, akkor igazából semmihez sem fogsz. Döntsd el melyik irány fog neked feküdni. Azt pedig úgy tudod meg, hogy rászánsz 3-4 hónapot egy témára 100%-al, minden mást mellőzöl addig a terveidből. Kezdésnek a játék fejlesztés valóban tökéletes lehet. Bár igazából már ez is elég komplex feladat lett. Grafika, történet, zene, leprogramozás, ezek mind-mind külön szakok már. Csak keress rá yt-on pl. egy szimpla indie játék fejlesztési naplójára, aki egyedül készíti, hogy lásd mennyi időt beleöl mire egy használhatóbb terméket letesz az asztalra. De szerintem ilyenekbe még ne ugorj bele. Kezdj egyszerűbbekkel, tic tac toe, kigyó, block breaker, esetleg aknakereső, vagy mind a négy is akár Aztán légy kreatív, adjál hozzá új funkciókat amik bonyolítják a játékmódot stb..és rájössz, hogy nem is olyan egyszerű, és meg még csak az alap.

  De ha olyanra gondoltál a hsz-idben, hogy te találod ki a következő "Flappy Bird-öt", hát...arra nem sok esély van.

• #14035 janos1988 addikt kovisoft #14034

  Új Válasz 2020-04-13 19:49:49 #14035

  Ú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

  

  janos1988

  addikt

  válasz kovisoft #14034 üzenetére

  Ki akartam kerülni a belső _mindiglefutó_ if elso=nil ellenőrzést, úgy, hogy a repeat előtt bekérem az első láncszemet és értekül adom az elsőnek+utolsónak. De így nagyon áttekinthetetlen az egész, jobb az eredeti.

  Igen, már látom, ahogy felhívtad rá a figyelmem, a 0 ellenőrzése elmaradt az átírt változatban.

• #14033 janos1988 addikt janos1988 #14032

  Új Válasz 2020-04-13 19:26:21 #14033

  Ú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

  

  janos1988

  addikt

  válasz janos1988 #14032 üzenetére

  Ha jól értelmezem a dolgokat akkor ezt a részt az eredetiben else utolso^.kov:=uj írhatnám így is else utolso^.kov:=nil?!

• #14032 janos1988 addikt

  Új Válasz 2020-04-13 19:12:09 #14032

  Ú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

  

  janos1988

  addikt

  Hali. Kellemes húsvéti ünnepeket!

  repeat
writeln('Kerek egy szamot (0-bevitel vege):');
readln(a);
if a>0 then begin
               new(uj);
                uj^.szam:=a;
                uj^.kov:=nil;
                if elso=nil then elso:=uj
               else utolso^.kov:=uj;
               utolso:=uj;
             end;
until a=0;

  Ezt átírtam így:

  writeln('Kerek egy szamot (0-bevitel vege):');
readln(a);
new(uj);
uj^.szam:=a;
uj^.kov:=nil;
elso:=uj;
utolso:=uj;
repeat
 writeln('Kerek egy szamot (0-bevitel vege):');
 readln(a);
 new(uj);
 uj^.szam:=a;
 utolso^.kov:=uj;
 utolso:=uj;
until a=0;
utolso^.kov:=nil;

  "Minden jó", leszámítva azt, hogy kiírja az átírt változat a 0-át, amit az eredeti nem (a 0 az egy kilépési feltétel).
  Ha én is hasonlót fogok majd készíteni, akkor melyik megoldás a jobb/szebb?

  Köszi!

• #14010 janos1988 addikt

  Új Válasz 2020-04-07 21:53:23 #14010

  Ú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

  

  janos1988

  addikt

  Jaj.

• #14009 janos1988 addikt sztanozs #14001

  Új Válasz 2020-04-07 18:55:05 #14009

  Ú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

  

  janos1988

  addikt

  válasz sztanozs #14001 üzenetére

  Köszi neked is és v12-nek is! Van még mit tanulnom...

• #14000 janos1988 addikt janos1988 #13999

  Új Válasz 2020-04-06 00:34:45 #14000

  Ú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

  

  janos1988

  addikt

  válasz janos1988 #13999 üzenetére

  Az én mitudoménhanyadik verzióm, de ez meg végtelen ciklusba megy át.

  program ermek_demo;
const
    n=2;
type
   a = array [1..n] of integer;
const
    ermek:a=(1,2);
function f_kombok(ermek:a;osszeg:integer):integer;
var
    kombo,temp:integer;
begin
  if osszeg=0 then f_kombok:=kombo;
  if osszeg<0 then f_kombok:=0;
  kombo:=0;
  for temp:=1 to n do kombo:=f_kombok(ermek,osszeg-ermek[temp]);
  f_kombok:=kombo;
end;
begin
    writeln(f_kombok(ermek,4));
    readln;
end.      

• #13999 janos1988 addikt

  Új Válasz 2020-04-06 00:23:34 #13999

  Ú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

  

  janos1988

  addikt

  https://www.youtube.com/watch?v=d5x8aejKUSQ&

  Ezt valaki Pascal nyelven le tudná írni? Nekem sehogy sem akar összejönni.

• #13982 janos1988 addikt janos1988 #13981

  Új Válasz 2020-04-01 21:04:40 #13982

  Ú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

  

  janos1988

  addikt

  válasz janos1988 #13981 üzenetére

  Pipa.
  Bocsi a sok offért. Viszont mára elég volt ennyi, majd holnap Hanoizok...

• #13981 janos1988 addikt janos1988 #13980

  Új Válasz 2020-04-01 20:45:51 #13981

  Ú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

  

  janos1988

  addikt

  válasz janos1988 #13980 üzenetére

  Jól van leesett. Ott van az else ágon 2 után félbeszakadt nyul(n-2) és onnan folytatja.
  De most kb. 10 perce követem nyomon a történéseket, hogy megértsem ezt is, mint a tegnapit.

  

• #13980 janos1988 addikt janos1988 #13973

  Új Válasz 2020-04-01 20:26:42 #13980

  Ú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

  

  janos1988

  addikt

  válasz janos1988 #13973 üzenetére

  Godoltam, hogy a nyulak sem lesznek egyszerűek. Már-már tiszta a kép velük kapcsolatban, DE:

  

  Szóval.
  Lefut 3-al, n-1, szakad, lefut 2-vel, n-1, szakad, lefut 1-el feltétel teljesül, nyul felveszi az 1-et. Na de utána miért fut le 0-val a then ág (még)egyszer?

• #13973 janos1988 addikt

  Új Válasz 2020-03-31 21:13:29 #13973

  Ú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

  

  janos1988

  addikt

  Köszi mindenkinek! Elolvastam, megnéztem mindet, de az öreg volt az i-re a pont!
  Tipikus tudásbeli hiányosságom volt. De hogy teljes(ebb) legyen a kép, holnap még egy kis Hanoi tornya és egy kis Fibonacci nyulak.

• #13966 janos1988 addikt Silεncε #13963

  Új Válasz 2020-03-31 19:28:42 #13966

  Ú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

  

  janos1988

  addikt

  válasz Silεncε #13963 üzenetére

  Huh. Már majdnem kezdtem megérteni általad, amikor kicsit módosítottam rajta, hogy követhetőbb legyen. Így sikerült elérnem, hogy teljesen belezavarodjak.

  Szóval addig fut amíg érteket nem kap az f1 (1-et). Visszatér. Stimt.

  "És így ezután szépen egymás után visszatér a 0+1, 0+2, ... n-1, n is. Ezért van az, hogy fordítva íródik ki." - De ezt a részt nem értem.

  Ahogy látszik az új képen, f1 mikor felveszi az 1-et már csak az else ág fut le. De ott is valamiért értékfelvétel előtt csak az /ELSE ELŐTT, azután már csak az /ELSE UTÁN, annak ellenére, hogy egy begin end; fogja össze őket. Ráadásul azt sem értem, hogy ha 0 lesz az n értéke (mert látszik, hogy annyi lesz), utána, hogy fogja növelni? Mi által? Hisz növeli. Vagy valamit én néztem be nagyon csúnyán?

  

• #13962 janos1988 addikt

  Új Válasz 2020-03-31 15:54:37 #13962

  Ú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

  

  janos1988

  addikt

  Hali.

  Próbálom megérteni a rekurzív függvény lényegét, de nem jön át. Az nem fér a fejembe, hogy nem pont visszafele kellene lefutnia?! Pedig már direkt kommenteltem is writeln-el. Az f2 függvény az evidens és "számomra" jól is fut. Köszi előre is a segítséget. Faktoriális számolása:

  

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