- AMD K6-III, és minden ami RETRO - Oldschool tuning
- Milyen belső merevlemezt vegyek?
- NVIDIA GeForce RTX 5080 / 5090 (GB203 / 202)
- TCL LCD és LED TV-k
- Csendben mutatkozott be a Galaxy S10 Lite
- Milyen processzort vegyek?
- Kormányok / autós szimulátorok topikja
- Ventilátorok - Ház, CPU (borda, radiátor), VGA
- Intel Core Ultra 3, Core Ultra 5, Ultra 7, Ultra 9 "Arrow Lake" LGA 1851
- Fujifilm X
-
PROHARDVER!
Új hozzászólás Aktív témák
-
#78693120
törölt tag
válasz
janos1988 #14000 üzenetére
A rekurziónál kell egy újrahívási feltétel.
Ez lehet egy if (ez egyszerűbb), vagy pl.: string/tömb feldolgozás esetén levágsz egy elemet a végéről/elejéről, tehát valamikor elfogynak az elemek. Esetleg egy szám értékéhez nézed, pl: >10 és ha 10, vagy alá csökken, akkor nem dolgozod fel tovább, vagyis nem hívod a függvényt, stb.
Persze, így is ki lehet futni a memóriából, ha túl sok elem van.Egy ilyen feltétel hiányzik a kódodból.
-
válasz
janos1988 #14000 üzenetére
A kódot nem igazán sikerült megfejtenem, csak, hogy egy végtelen rekurzív ciklusba fut (a for ciklusban mindig kötelezően meghívja magát...)
mod: hiányzik az exit az if-ek végéről
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;temp_index:integer):integer;
var
temp:integer;
begin
if osszeg=0 then
f_kombok:=1;
exit;
end;
if osszeg<0 then
f_kombok:=0;
exit;
end;
f_kombok:=0;
for temp:=temp_index to n do f_kombok:=f_kombok+f_kombok(ermek,osszeg-ermek[temp],temp);
end;
begin
writeln(f_kombok(ermek,4,1));
readln;
end.
modmod: kib&@#{ kódszerkesztő
Új hozzászólás Aktív témák
● olvasd el a téma összefoglalót!
- World of Tanks - MMO
- Autós topik
- Videó stream letöltése
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- OFF TOPIC 44 - Te mondd, hogy offtopic, a te hangod mélyebb!
- One otthoni szolgáltatások (TV, internet, telefon)
- Milyen belső merevlemezt vegyek?
- Autós topik látogatók beszélgetős, offolós topikja
- NVIDIA GeForce RTX 5080 / 5090 (GB203 / 202)
- Villanyszerelés
- További aktív témák...
- BESZÁMÍTÁS! Asus H310M i3 9100F 16GB DDR4 120GB SSD 500GB HDD GTX 970 4GB Zalman ZM-T7 FSP 400W
- BESZÁMÍTÁS! ASUS TUF A620M R5 7600X 32GB DDR5 1TB SSD RX 6700 XT 12GB ZALMAN I3 NEO A-Data 750W
- GYÖNYÖRŰ iPhone 12 64GB Black -1 ÉV GARANCIA - Kártyafüggetlen, MS2113, 100% Akkumulátor
- Beszámítás! Apple iPad Pro 11 2024 1TB WiFi + Cellular tablet garanciával hibátlan működéssel
- Apple iPhone X 64GB, Kártyafüggetlen, 1 Év Garanciával
Állásajánlatok
Cég: FOTC
Város: Budapest