[Huan]

Keddre meg kell írnom TurboPascalban egy képernyõkíméli programot... Valakik segítsenek légyszi, ezen múlik a felvételi jegyem Pill és bemásolom a feladatot...

[Huan]

Készítsen programot "kepernyo" néven, mely a következõket tudja:

1. Bekér egy legfeljebb 20 karakterbõl álló szöveget.

2. Ezt képernyõtörlés után kiírja a képernyõ közepére.

3. Ezután az "s" billentyû leütésére véletlenszerû irányban elindulnak a betûk. Egy lépésben a betûk függõlegesen, vízszintesen vagy átlósan léphetnek a szomszéd helyre, vagy helyben maradnak. A betûk egymásra kerülhetnek, de véglegesen ne vesszenek el!

4. A betûk a képernyõ széléhez érve szabályosan pattannak vissza. (A képernyõre merõleges sebességkomponens ellentettjére változik.)

5. Egy menetben minden betû egyet lép. A menetek közötti várakozási idõt a "g" leütésével lehessen csökkenteni, az "l" leütésével növelni, de ne lehessen nulla, és legyen felsõ korlátja is!

6. A programból a "q" leütésével lehessen kilépni!

[Huan]

Ez lenne a feladat, és kellenének a programozási tételek (google-n mindjárt szétnézek, de azért beírom ide is): eldöntés, keresés, kiválasztás, megszámlálás, összegzés, rendezés, minimum, maximum.

Kérem szépen valaki segítsen, mert nagyon nagy bajba jutnék, ha nem sikerül. Az msn címem: huan28@gmail.com Aki tud segíteni vegyen fel!

KÖSZÖNÖM!

[Tiara]

Talán itt próbáld meg: https://forum.hwsw.h...hp?showforum=19

[Sipi-]

Idézet: Tiara - Dátum: 2006. jan. 11., szerda - 14:12

Talán itt próbáld meg: https://forum.hwsw.h...hp?showforum=19

Tegnapra kellett neki, sztem már késõ.

[Tiara]

Idézet: Sipi- - Dátum: 2006. jan. 11., szerda - 15:27

Tegnapra kellett neki, sztem már késõ.

Hát az pech

[kroozo]

Idézet: Tiara - Dátum: 2006. jan. 11., szerda - 14:44

Hát az pech

Mondjuk azért az írja meg helyettem valaki, hogy bejuthassak a Zegyetemre típusú kérdésektõl kinyílik a bicska az ember zsebébe, szal szerintem annyira nem pech. Mi lesz, ha már így is kezdi... Legalább az elsõ 2-3 vizsgaidõszakig kihúzhatná :Ð

Arról nem beszélve, hogy gyakorlatilag ugyanezt a problémát (csak kicsit bonyolultabban, és a karaktereket gázmolekuláknak nevezve) kb 2-3 hete _példakódostól_ kitárgyalták a Communitas Magistorumban, csak meg kellett volna keresni....

[KovacsUr]

Idézet: kroozo - Dátum: 2006. jan. 11., szerda - 16:06

Mondjuk azért az írja meg helyettem valaki, hogy bejuthassak a Zegyetemre típusú kérdésektõl kinyílik a bicska az ember zsebébe, szal szerintem annyira nem pech. Mi lesz, ha már így is kezdi... Legalább az elsõ 2-3 vizsgaidõszakig kihúzhatná :Ð

Elõször én is majdnem nagyon kiosztottam a srácot, de aztán arra jutottam, hogy lehet, hogy csak az átlagába kellene a jegy, és az életben nem akar programozni. Nem vagyok igazán tisztában az új érettségi/felvételi rendszerrel.

[Huan]

Sziasztok! Eletemben nem akarok programozni!... Chak az atlagba kellene, szombatig kaptam hataridot, es azzol a konnyitessel, hogy nem kell a sebesseges dolgot beleraknom! PLZ Help! THX!

[droland]

Nincs TP-m már így csak elméletben.

Kell egy rekord, ennek a rekordnak legyen egy max. 20-as tömbje, illetve egy X és egy Z byte változója. Az elsõ a leütött karaktereket tartalmazza, a maradék kettõ a karakternek a képernyõn a helyét.

A bekért max. 20-as string esetén ha csak 10 lett leütve az nem baj, akkor is dolgozol mind a 20-al, csak akkor a maradék 10 üres karakter. Ezt az elején old meg, hogy egy ciklussal a tömb mind a 20 értéke kapjon " " értéket.

Legyen egy R véletlen szám.

Mikor leütik a S betût minden egyes betû megjelenítés elõtt R legyen 1 vagy 2 vagy 3 vagy 4. Ha 1 akkor x=x-1 (de csak ha x nagyobb, mint -1), ha 2 akkor x=x+1 (de csak ha x kisebb mint 80), ha 3 akkor y=y-1 (de csak ha y nagyobb, mint -1) , ha 4 akkor y=y+1 (de csak ha y kisebb, mint 25).

Az r véletlen generálása után legyen egy delay(s), ahol s keydetben a program elején 100.

G esetén s=s-10 (de csak ha s nagyobb mint 9), illetve i esetén s=s+10 (de csak ha s kisebb, mint 500)

If keypressed than read(key); if key="q" then exit;

Bár így véletlen szerûen ugrálnak, de minimum kettes

R=rekord of
     
         k:set of char;
         x:byte;
         y:byte;
end;

Talán így kell, már nem emlékszem ez a baj, a logikai menetet leírtam, tán nem hagytam ki semmit (ez most így hírtelen fejbõl jött). (biztos sok a hiba, de a pontosságokra már nem emléxem )

Szerkesztette: droland 2006. 01. 12. 16:18 -kor

[SFIJ]

Idézet: Huan - Dátum: 2006. jan. 12., csütörtök - 16:03

Sziasztok! Eletemben nem akarok programozni!... Chak az atlagba kellene, szombatig kaptam hataridot, es azzol a konnyitessel, hogy nem kell a sebesseges dolgot beleraknom! PLZ Help! THX!

mennyit fizetsz érte?

[HavocS]

Hát igen Megteheted, hogy utánajárással megírod droland útmutatója alapján (ezzel már tényleg baromi könnyû, csak a szintaxisokat kell kiguglizni (sõt, van a TP-nek egy egész jó helpje is), vagy pedig valakit megkérsz rá x összegért, hogy dobja össze.

Szerkesztette: HavocS 2006. 01. 13. 08:16 -kor

[kroozo]

Idézet: KovacsUr - Dátum: 2006. jan. 12., csütörtök - 11:46

Elõször én is majdnem nagyon kiosztottam a srácot, de aztán arra jutottam, hogy lehet, hogy csak az átlagába kellene a jegy, és az életben nem akar programozni. Nem vagyok igazán tisztában az új érettségi/felvételi rendszerrel.

És? Engem sem kifejezetten mozgatott például az irodalom azon része, amelyet tanítottak, sem a fizika, mégis megtanultam, mert kellett az átlagomba, nem pedig megkértem valakit, hogy csinálja meg helyettem. Aztán tudomásul vettem, hogy az amit így elértem (és fõként annak köszönhetõen, hogy nem tanultam meg annyira, mint kellett volna) nem lett belõle BME, csak BMF.


Nem látom a különbséget. Más tudásával akar elõnyhöz jutni, önálló próbálkozásra utaló jelek nélkül...

[KovacsUr]

Idézet: kroozo - Dátum: 2006. jan. 13., péntek - 11:30

És? Engem sem kifejezetten mozgatott például az irodalom azon része, amelyet tanítottak, sem a fizika, mégis megtanultam, mert kellett az átlagomba, nem pedig megkértem valakit, hogy csinálja meg helyettem. Aztán tudomásul vettem, hogy az amit így elértem (és fõként annak köszönhetõen, hogy nem tanultam meg annyira, mint kellett volna) nem lett belõle BME, csak BMF.


Nem látom a különbséget. Más tudásával akar elõnyhöz jutni, önálló próbálkozásra utaló jelek nélkül...

Az tény, hogy nem szép dolog, de különbség azért van. Elképzelhetõ például, hogy Huan orvosnak készül. Be tud seggelni tíz kilós könyveket, de az életben nem tudná algoritmizálni a kávéfõzést. Akkor most mi van?

[kroozo]

Idézet: KovacsUr - Dátum: 2006. jan. 13., péntek - 12:10

Az tény, hogy nem szép dolog, de különbség azért van. Elképzelhetõ például, hogy Huan orvosnak készül. Be tud seggelni tíz kilós könyveket, de az életben nem tudná algoritmizálni a kávéfõzést. Akkor most mi van?

Az, hogy szar a felvételi rendszer némileg...

[KovacsUr]

Idézet: kroozo - Dátum: 2006. jan. 13., péntek - 12:26

Az, hogy szar a felvételi rendszer némileg...

(Szerintem zárható )