Fejtörő (2012-2013)

Mókás, de direkt dögnehéz programozási feladványok Spectrumra...
Avatar
makranc
Speccyalista
Hozzászólások: 255
Csatlakozott: 2012.01.11. 11:00
Tartózkodási hely: Budapest, III.

Re: Fejtörő (2012-2013)

Hozzászólás Szerző: makranc » 2012.12.31. 18:13

Zozosoft írta: így a növelésre még nincs ötletem...
Kezdőértéket akár INPUT-tal is meg lehetne adni, csak a növelést nem tudom megoldani én se.

Avatar
Zozosoft
Speccyalista
Hozzászólások: 735
Csatlakozott: 2012.01.06. 14:03
Kapcsolat:

Re: Fejtörő (2012-2013)

Hozzászólás Szerző: Zozosoft » 2012.12.31. 19:13

CODE-val lehetne még alkotni, csak az a baj, hogy ehhez fix 4 karakteres kiírás kéne, míg ha számként írjuk ki, akkor a bevezető nullák lemaradnak. Szám kiírás formázására nem találtam lehetőséget Sinclair BASIC-ben :-(

Avatar
makranc
Speccyalista
Hozzászólások: 255
Csatlakozott: 2012.01.11. 11:00
Tartózkodási hely: Budapest, III.

Re: Fejtörő (2012-2013)

Hozzászólás Szerző: makranc » 2012.12.31. 19:53

Hát akkor csak egymásnak kívánhatunk BÚÉK-ot, a rém meg várhat Gyuri megoldására!
:D

BÚÉK MINDENKINEK!

Avatar
Csipetke
Speccyalista
Hozzászólások: 29
Csatlakozott: 2012.10.25. 03:19
Tartózkodási hely: Budapest, Széna tér

Re: Fejtörő (2012-2013)

Hozzászólás Szerző: Csipetke » 2012.12.31. 20:47

Szervusztok! Ez egy nagyon ötletes feladat! Egy dolog nincs kikötve, hogy nem szabad függőlegesen írni az évszámot! Ez talán könnyít a fladat megoldásában! Még gondolkodom a vízszintes normál kiírás megoldásán, de az elöbbi 4 programsorban már készen van, működik rendesen!
Csatolmányok
BUEK2013.JPG
BUEK 2013 mindn kedves Spectrum kedvelőnek!

Avatar
Csipetke
Speccyalista
Hozzászólások: 29
Csatlakozott: 2012.10.25. 03:19
Tartózkodási hely: Budapest, Széna tér

Re: Fejtörő (2012-2013)

Hozzászólás Szerző: Csipetke » 2013.01.01. 03:21

Az ötletes feladványt illik viszonozni! Ez okból a megalkotójának szól a következő egyszerű rejtvény, persze más is válaszolhat rá, ha tudja a megoldást! Egy számsor így kezdődik:

1,4,5,6,7,8,10,20, ? Vajon hogy folytatódik? Hány eleme van a számsornak?

Szabad számítógépet is használni, ha fejben nem megy!



Bemelegítőnek ajánlom az alábbi kis rejtvény megfejtését:

Rita apjának 5 lánya van.
A születésük sorrendjében az alábbi neveket kapták:


1. lány neve: Kah
2. lány neve: Keh
3. lány neve: Kih
4. lány neve: ?
5. lány neve: Kuh


Vajon hogy hívják a 4. lányát?

Üdv. Csipetke

Avatar
makranc
Speccyalista
Hozzászólások: 255
Csatlakozott: 2012.01.11. 11:00
Tartózkodási hely: Budapest, III.

Re: Fejtörő (2012-2013)

Hozzászólás Szerző: makranc » 2013.01.01. 08:59

Csipetke írta:Szabad számítógépet is használni, ha fejben nem megy
Google search?
:D

A megfejtés programsorai érdekesebbek lennének, mint egy screenshot...

Avatar
Csipetke
Speccyalista
Hozzászólások: 29
Csatlakozott: 2012.10.25. 03:19
Tartózkodási hely: Budapest, Széna tér

Re: Fejtörő (2012-2013)

Hozzászólás Szerző: Csipetke » 2013.01.01. 09:21

Nem a keresőnek adtam fel! Hát ha valaki átpasszolja, akkor a haszna is 0! Szóval nem illik a keresőt használni a kis gondolkodás helyett!

Node vajon a BUEK 2013 feladvány már készen van? Friss fejjel nekiestem és már kész is a szokásos vízszintes kiíratással is! Ez is 10 sor alatt van! Működik szépen. Ha nem érkezik másoktól megfejtés, akkor betszem azt a pár programsort, de egyelőre még néhány napot várok. Addig viszont van még feladványom egy másik helyen! Üdv. Csipetke
Csatolmányok
MEGOLDVA.JPG
Ez a vízszintes kiírású változat képe.

Avatar
Bali
Site Admin
Hozzászólások: 2028
Csatlakozott: 2012.01.06. 13:34
Tartózkodási hely: Budapest III.
Kapcsolat:

Re: Fejtörő (2012-2013)

Hozzászólás Szerző: Bali » 2013.01.01. 11:19

... És egyesével elszámol 2013-ig? :) Persze az nem volt leírva, hogy ki is kell iratni. :)
Amúgy mindenki azzal foglalkozik, hogy mi nincs, ahelyett, hogy a megmaradt parancsokra koncentrálna.
-= Bali =-
(c) 1983-2017 Evil-Soft

Avatar
stp
Speccyalista
Hozzászólások: 31
Csatlakozott: 2012.01.06. 14:39
Tartózkodási hely: Debrecen

Re: Fejtörő (2012-2013)

Hozzászólás Szerző: stp » 2013.01.01. 16:04

Zozosoft írta:SCREEN$-ral lehetne kezdeni valamit, a képernyőre kiírt, majd visszaolvasott adat lenne a változó maga. Csak a VAL is ki van zárva, így a növelésre még nincs ötletem...
Első körben azzal próbálkoztam, hogy SCREEN$-el kiolvasom a képernyőre kiírt karaktereket és szépen felszorozgatva megkapom az aktuális számot. A probléma az, hogy ugye VAL nincs, és minusz jelünk sincs, hogy a CODE SCREEN$(y,x)-ból kivonjunk 48-at. Esetleg erre lehetne vmi trükköt kitalálni. Sajnos mivel a számokat a Sinclair BASIC lebegőpontosként ábrázolja, ezért nem lehet átfordítani a számértéket összeadással.
Lehetne úgy is számolgatni, hogy a karakterek ASCII kódját növeljük, csak akkor karakterenként kellene kiírni meghatározott helyre a képernyőre az új karaktert. Ez nekem nem sikerült, mert a PRINT AT y,x;""-höz hiányzik a pontosvessző. Érdekes módon a PRINT CHR$ 22+CHR$ y+CHR$ x+"SZÖVEG" nagyon jól működik addig, amíg a stringet konstansként adjuk meg, de ha már a szöveg helyére a SCREEN$ (y,x)-kerül, akkor már nem működik.
Lehetne összefűzni a négy karaktert egymás mellé, de a PRINT-en belüli összefűzéshez szintén kellene a pontosvessző, mert a + jellel valamiért nem sikerül összefűzni a stringeket, ha tartalmaz a SCREEN$ által visszaadott értéket... :?
Én egyenlőre itt tartok.

Avatar
Zozosoft
Speccyalista
Hozzászólások: 735
Csatlakozott: 2012.01.06. 14:03
Kapcsolat:

Re: Fejtörő (2012-2013)

Hozzászólás Szerző: Zozosoft » 2013.01.01. 16:55

stp írta: A probléma az, hogy ugye VAL nincs, és minusz jelünk sincs, hogy a CODE SCREEN$(y,x)-ból kivonjunk 48-at. Esetleg erre lehetne vmi trükköt kitalálni.
Ez meg volt nekem, kerestem valamit, ami negatív eredményt ad, SGN-el meg is van a -1:
CODE(SCREEN$(1,0))+SGN(COS(90))*3*16 (4-esünk sincs)

Lezárt

Ki van itt

Jelenlévő fórumozók: nincs regisztrált felhasználó valamint 2 vendég