Nyn) V*m p@edstav)m svoje @e&en), kter[ najdete v souboru PYRAM.LST jako listing programu v TURBOBASICU. ╱Je uveden jako listing ze dvou d+vod+. Hlavn)m d+vodem je to, (e si jej m+(ete prohl[dnout rovnou zde, v hypertextu. A tak[ - listing je krat&) o jeden sektor.$ Tento program mus)te do TURBOBASICu na')st povelem:¢¢ ENTER"D:PYRAM.LST"¢¢ ╱tohle za v*s ud%l* volba 8 v "AUTORUN.BAS" na stran% B$ pot[ jej norm*ln% spust)te. Nyn) ale ji( popis: ¢¢ ②*dky 10 - 60: vynuluj) se vestav%n[ TURBOBASICovsk[ hodiny a vyp)&e hlavi'ka.¢¢ ②*dek 70: definice pole prom%nn[ A╱9,9$, kde bude vlastn) pyramida po')t*na.¢¢ ②*dky 80 - 100: definuj) se t@i zn*m* ')sla ve spodn) @ad% ╱2., 5. a 8. ')slo v 9. @ad%$.¢¢ ②*dek 110: cyklus, definuj)c) prvn) a t@et) ')slo spodn) @ady. Tady existuje jednoduch` vztah: pokud bude prvn) ')slo I, druh[ ')slo je defini'n% dan[ jako 4 a t@et) bude J, potom dv% ')sla nad nimi, 1. a 2. v @*dku 8. budou 4⇩I a 4⇩J. Stejn`m zp+sobem mus) b`t 1. ')slo v @*dku jejich sou'tem, neboli 8⇩I⇩J a to se mus) rovnat 10. Jednoduch`m @e&en)m zjist)me, (e I⇩J=2 a mo(n[ kombinace I a J jsou 0,2; 1,1; 2,0.¢¢ ②*dek 120: cyklus definuj)c) sedm[ a dev*t[ ')slo M, N. Ze stejn`ch d+vod+ mus) b`t jejich sou'et roven 4.¢¢ ②*dky 130 a 140: cykly definuj)c) 'tvrt[ a &est[ ')slo spodn) @ady. Proto(e roste mo(nost kombinac), zkou&ej) se v&echna ')sla od 0 do 3. V)ce nem* cenu, proto(e i kdyby byly na ostatn)ch m)stech nejni(&) @ady pouze nuly, v p*t[m @*dku by na p@)slu&n`ch m)stech vych*zela ')sla v%t&) jak 20.¢¢ ②*dky 150 a 160: p@i@azen) ')sel I a( N do spodn) @ady pole A╱x,9$¢¢ ②*dky 170 - 200: nyn) m*me p@edpokl*danou podobu spodn) @ady. V t%chto dvou cyklech se vypo')taj) v&echny 'leny pyramidy podle zad*n) - ka(d` prvek je sou'tem dvou pod n)m le()c)ch.¢¢ ②*dky 210-240: na t%chto @*dc)ch testujeme, zda vypo')tan[ 'leny na vy&&)ch patrech odpov)daj) definovan`m ╱krom% des)tek na 7 @*dku, kter[ tam budou v(dy - viz @*dky 110 a 120$. Pokud se najde chyba, p@esko') se v`pis @e&en).¢¢ ②*dek 250: v`pis spr*vn[ho v`sledku ╱spr*vn`ch v`sledk+$.¢¢ ②*dky 260-290: konce cykl+ definuj)c)ch prvky spodn) @ady.¢¢ ②*dky 300 - 340: v`pis 'asu pot@ebn[ho k v`po'tu ve form*tu hhmmss.¢¢¢ Tento program reprezentuje pouze jedno z mo(n`ch @e&en). Je zalo(en na principu "vyzkou&ej v&echno", kter` je vylep&en o ]vahu, kter[ kombinace vylou'it p@edem. Program takto testuje 240 kombinac) a Vy v)te, (e m*te podchycena v&echna @e&en). Kdybyste nap@)klad na v&ech m)stech nez*visle p@edpokl*dali t@eba ')sla 0 a( 9, potom by testovan`ch pozic bylo 1000000 a 'asov* n*ro'nost by byla podstatn% v%t&).¢¢ Jaksi "nej'ist&)m" @e&en)m by bylo uva(ovat soustavu 6 rovnic o 6 nezn*m`ch. Jednalo by se o vy')slen) 6 zn*m`ch ')sel na vy&&)ch patrech pomoc) 6 prom%nn`ch na spodn)m @*dku. To by se ale zt%() dalo d%lat na po')ta'i.¢¢ Jan Walla¢
