- PCI bővítőhelyet elfoglaló Icy Dock mobilrack M.2-es SSD-knek
- Elon Musk járatára váltott jegyet a legújabb magyar műhold
- Viszonylag olcsó, 26,5 hüvelykes QD-OLED monitor bukkant fel az MSI kínálatában
- Jönnek az egyes, problémákkal küzdő ASUS ROG noteszgépek kipofozott BIOS-ai
- GeForce RTX 5060: Ezt kapjuk 150 ezerért
- AMD Ryzen 9 / 7 / 5 9***(X) "Zen 5" (AM5)
- Apple MacBook
- Apple asztali gépek
- AMD Ryzen 9 / 7 / 5 7***(X) "Zen 4" (AM5)
- Házi barkács, gányolás, tákolás, megdöbbentő gépek!
- Léghűtés topik
- AMD Navi Radeon™ RX 9xxx sorozat
- Intel Core i7-5xxx "Haswell-E/EP" és i7-6xxx "Broadwell-E/EP" (LGA2011-v3)
- GeForce RTX 5060: Ezt kapjuk 150 ezerért
- Milyen videókártyát?
-
PROHARDVER!
Új hozzászólás Aktív témák
-
vz12
tag
válasz
sztanozs #14001 üzenetére
- az "exit" mellett a "begin ... end" is hiányzott, mert az kell, ha több utasítás van a blokkban
- amúgy az "exit" nem igazán szép
- nem kellene kipróbálni, hogy működik-e, mielőtt kiadjuk a kezünkből?Én kipróbáltam, így működik:
program ermek_demo;
const n = 2;
type ermek_tipus = array [1..n] of integer;
const ermek:ermek_tipus = (1,2);
function f_kombok(ermek:ermek_tipus; osszeg,temp_index:integer):integer;
var i, tmp_kombok:integer;
begin
if (osszeg=0) then
tmp_kombok:=1
else
if (osszeg<0) then
tmp_kombok:=0
else begin
tmp_kombok:=0;
for i:=temp_index to n do
tmp_kombok:=tmp_kombok+f_kombok(ermek, osszeg-ermek[i], i);
end;
f_kombok:=tmp_kombok;
end;
begin
writeln(f_kombok(ermek,4,1));
end.
Új hozzászólás Aktív témák
● olvasd el a téma összefoglalót!
- AMD Ryzen 9 / 7 / 5 9***(X) "Zen 5" (AM5)
- Apple MacBook
- Kijelző került a kamerasávra a Xiaomi 17 Pro és 17 Pro Max hátulján
- Teljes verziós játékok letöltése ingyen
- Goddess of Victory:Nikke
- Audi, Cupra, Seat, Skoda, Volkswagen topik
- urandom0: Kicsit most elfáradtam...
- Xbox Series X|S
- Homokféreggel is pózolhatna a OnePlus 15
- Apple asztali gépek
- További aktív témák...
- SzoftverPremium.hu
- AKCIÓ! Microsoft Surface 5 13,5 notebook - i5 1235U 8GB RAM 256GB SSD Intel Iris Xe IGP 27% áfa
- Lenovo ThinkPad P14s Gen 1 i7-10510 32GB 512GB Nvidia Quadro P520 14" FHD Gar.: 1 év
- Xiaomi Redmi Note 13 256GB Kártyafüggetlen 1 év Garanciával
- Eladó Apple iPhone 14 Pro 128GB Arany / 12 hó jótállás
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: Laptopműhely Bt.
Város: Budapest