Udv!

Sajnos nem jutok elore, iletve letolotttem a pascal 5.5-ot,
de nem megy a programozas. :-((

Tudnatok egy mintat kuldeni?

Legyen mondjuk ez a program vazlata:

valtozok:
a: lista elemeinek szama
b: osszeg

elso ciklus: lista elemeinek a bekerese 
(csak pozitiv egesz szam lehet)

masodik ciklus: lista elemeinek sorba rendezese - csokkeno
sorrendben tarolva

harmadik ciklus: ellenorzes

feltetel: osszeg nagyobb-e a legnagyobb elemnel
ha nem: kovetkezo lista elem (ciklikus)
ha igen: aktualis szam beolvasas
lista eleje az aktualis szam -1
 aktualis szam+1
  ciklus indul 
  kovetkezo listelem hozzadas, eredmeny eltarolas
  eredmeny listaba, valamint eredmeny-osszeg tarolasa is
  ciklus vege 
 ellenorzes: ha eredmeny kisebb osszeg, akkor a kovetkezo
 listaelemet is hozzaadja (nem csak ket szam osszege lehet)
 aktualis szam leptetes (lista vegeig)
lista vege

negyedik ciklus
eredmenylista rendezese eredmeny-osszeg szerinti 
sorrendbe
vege

Ez hogy nez ki - helyes szintaktikaval :-)) - pascalban?

Üdvözlettel:

Trautman Viktor
travik freemail hu

Udv!

Lehet, hogy az elobb osszekutyultam valamit, azt
akartam, hogy nemcsak ket elemet adhat ossze a
program, hanem mindazon osszeget, ami kisebb
a keresett osszegnel.

Inkabb irok egy konkret peldat:

egy 6 elemu lista csokkeno sorrendben:
150, 100, 80, 40, 20, 10

a keresett osszeg: 100

Ekkor a kovetkezo eredmenylista adodik:
(kulonbseg szerinti sorrendben)

osszeg        kulonbseg
100               0
80+20           0
80+10           10
80                 20
40+20+10     30
40+20           40
40+10           50
20+10           70
20                 80
10                 90



Üdvözlettel:

Trautman Viktor
travik freemail hu