[vastaus aiempaan viestiin]
| Kirjoittaja: | Seppo Mustonen |
|---|---|
| Sähköposti: | - |
| Päiväys: | 15.3.2002 13:41 |
Jälleen on tullut (henk.koht.viestinä) oikea ratkaisu, jonka
lähetti Sylvi Kantele eli hänelle lähtee luvattu palkinto ja
lämpimät onnittelut!
Koska ratkaisijat ovat olleet niin "ujoja", etteivät ole tuotoksiaan
tähän keskusteluun toimittaneet, esitän tässä omani(edelleen ilman
kommentteja):
*TUTSAVE A
*{tempo -1}{init}{R}{erase}{erase}{W4=*}{W5=^}
*{print W1}(10:factors)={act}{l} {save word W2}{line start}{erase}
*{print W2}*{line start}
+ A: {r}{save char W3}
- if W3 '=' {sp} then goto C
- if W3 '=' W4 then goto E
- if W3 '<>' W5 then goto A
+ D: {save char W3}
- if W3 '=' W4 then goto E
* {goto D}
+ E: {l}{goto A}
+ C: {line start}{W4=W1}
+ F: {save word W3}{W5=W3-1}{W4=W4*W5}{W4=W4/W3}
*{next word}{save word W2}
- if W2 > W3 then goto F
*{line start}{erase}{print W4}
*{tempo +1}{end}
Huom. Ratkaisusta on olemassa hieman toisistaan poikkeavia muunnelmia,
mutta ne kaikki johtavat samaan tulokseen.
Kilpailu on siis ohi!
Kuten edellisessä viestissäni totesin, kukaan ei ole tähän mennessä
osannut kertoa, mikä on A-sukron antamien tulosten varsinainen
tulkinta.
Miettikääpä tätä käyttäen apuna mahdollisuutta laskea A-sukron
tuloksia esim. pienillä kokonaisluvuilla. Tulkinta on todella
yksinkertainen.
Jos "tulkintoja" ei kuulu parin päivän sisällä, palaan asiaan ensi
viikon alussa.
| Vastaukset: |
|---|
Survo-keskustelupalstan (2001-2013) viestit arkistoitiin aika ajoin sukrolla, joka automaattisesti rakensi viesteistä (yli 1600 kpl) HTML-muotoisen sivukokonaisuuden. Vuoden 2013 alusta Survo-keskustelua on jatkettu entistäkin aktiivisemmin osoitteessa forum.survo.fi. Tervetuloa mukaan!