pascal pomoc zaseknutí v cyklu while

Místo pro dotazy a rady ohledně programovacích jazyků (C++, C#, PHP, ASP, Javascript, VBS..) a tvorby webových stránek

Moderátor: Mods_senior

Uživatelský avatar
Akrej
Level 5.5
Level 5.5
Příspěvky: 2999
Registrován: červen 12
Pohlaví: Muž
Stav:
Offline

pascal pomoc zaseknutí v cyklu while

Příspěvekod Akrej » 13 led 2018 23:01

Zdravím

Podlouhé době chuť na pascal tak jsem něco zkusil, nehledejte vtom hlupší smysl. Můj problem je že když je odpověď blbě tak se má odečíst život ale pak nevím jak bych to nasměroval zpatky do hry. Bude tam více operací které se budou dat vyresit jinak a jednodusej, ale jak pisu verze 0.01 a opakuju si co umim a učím se. Napiště mi jak to vyřešit přimo jako část kodu můžete ale prosím do spoiler bloku.

hrači test a test1 je prvotní verze jak zamezit vstup bez zadaní.

► Zobrazit spoiler
"Nejsem nerozumný. Jen nemám ten samý rozum jako vy."
Diogénes ze Sinopé
-------------------------------------
„Mějte dobrou náladu. Dobrá nálada vaše problémy sice nevyřeší, ale naštve tolik lidí kolem, že stojí za to si ji užít.“
Jan Werich
--------------------------------------
Snažím se psát bez chyb
-------------------------

Reklama
Uživatelský avatar
faraon
Master Level 8.5
Master Level 8.5
Příspěvky: 7356
Registrován: prosinec 10
Pohlaví: Muž
Stav:
Offline

Re: pascal pomoc zaseknutí v cyklu while

Příspěvekod faraon » 13 led 2018 23:22

Takhle nějak?
► Zobrazit spoiler
"Král Lávra má dlouhé oslí uši, král je ušatec!

(pravil K. H. Borovský o cenzuře internetu)

Uživatelský avatar
Akrej
Level 5.5
Level 5.5
Příspěvky: 2999
Registrován: červen 12
Pohlaví: Muž
Stav:
Offline

Re: pascal pomoc zaseknutí v cyklu while

Příspěvekod Akrej » 14 led 2018 13:03

faraone můžu se tě odborně zeptat na přehlednost v kodu dřív když jsem začinal vypadalo to jak "blivajs" teď jsem se tomu snažím dat strukturu. Můžež mi poradit co a jak?
"Nejsem nerozumný. Jen nemám ten samý rozum jako vy."
Diogénes ze Sinopé
-------------------------------------
„Mějte dobrou náladu. Dobrá nálada vaše problémy sice nevyřeší, ale naštve tolik lidí kolem, že stojí za to si ji užít.“
Jan Werich
--------------------------------------
Snažím se psát bez chyb
-------------------------

Uživatelský avatar
faraon
Master Level 8.5
Master Level 8.5
Příspěvky: 7356
Registrován: prosinec 10
Pohlaví: Muž
Stav:
Offline

Re: pascal pomoc zaseknutí v cyklu while

Příspěvekod faraon » 14 led 2018 21:56

Na to ti zcela neodborně řeknu: piš to tak aby ses v tom sám vyznal, nejlépe na první pohled a bez hledání 8)
Zkus si dát v editoru menší písmo, a postav se dál od monitoru. Pokud se ti text slije do skupinek a bloků, a rozeznáš v nich nějakou strukturu, které části spolu souvisejí a navazují na sebe, nebo jsou naopak viditelně oddělené, jsi na správné cestě.

Základ je horizontální odsazování: https://en.wikipedia.org/wiki/Indentation_style, třeba Python je na něm přímo založený.
Vyzkoušej si různé styly, časem přijdeš na to co ti vyhovuje víc nebo méně. Já jsem ten můj našel v jedné prastaré učebnici Algolu, podobá se mu Whitesmiths. Předtím jsem používal všechno možné, a například jsem velmi rychle přišel na to že dva sloupce z Pascalu mi v Céčku pro přehlednost nestačí ani náhodou!

Trochu opomíjené, ale neméně důležité, je vertikální odsazování. Například samostatné souvislé činnosti uvnitř jedné funkce jsou oddělené jedním prázdným řádkem, a jednotlivé funkce třemi řádky, takže i zdálky poznáš kde začínají a končí. Je to stejné jako u Morseovky, čárka je dlouhá jako tři tečky, mezera mezi značkami jako tečka, mezera mezi písmeny jako čárka.
To se dodržuje mnohem snáz než to horizontální, a hlavně není tisíc různých způsobů.

Kdysi v TurboPascalu jsem měl IDE nastavené na rozlišení 50x80 (místo standardního 25x80), byl tak vidět mnohem větší kus zdrojáku a lépe se v něm orientovalo. V tom jsou dnešní módní širokoúhlé nudličky úplně na hovno, to je dobré akorát na sledování filmů, ale ne na práci. K psaní by byl mnohem vhodnější monitor umístěný na výšku, jako měly například počítače Xerox Alto:
https://www.youtube.com/watch?v=M0zgj2p7Ww4
Které měly grafické rozhraní ovládané myší dřív, než Bill Gates založil Micro-Soft :lol:
"Král Lávra má dlouhé oslí uši, král je ušatec!

(pravil K. H. Borovský o cenzuře internetu)

Uživatelský avatar
satik
Level 6
Level 6
Příspěvky: 3509
Registrován: leden 15
Bydliště: Krkonoše
Pohlaví: Muž
Stav:
Offline
Kontakt:

Re: pascal pomoc zaseknutí v cyklu while

Příspěvekod satik » 27 úno 2018 14:03

Par obecnych poznamek, co me ted jen narychlo napadnou k prehlednosti kodu:
1. Mit kod konzistentni - to znamena napriklad odsazovani mit vusde stejny, je uz tvoje osobni preference jestli mezery/taby a kolik, jmenny konvence - pouzivat vsude stejnej zpusob nazvu promennych - od jazyku (nemichat cz/en) po to, jestli pises podtrzitka, velky/maly pismena...
2. Nemit nikde vic nez rekneme 3 radky kodu stejny - pokud se ti nekde takovej kod opakuje, napis si na to funkci a volej ji.
3. Mit kod logicky rozdeleny, nemichat cast, co neco pocita a cast, co to zobrazuje uzivateli, kazdy by melo bejt ve svym souboru a pokud programujes objektove, tak ve svy tride.
4. Nazvy promennych by mely vystihovat tu promennou a kdyz to vidi nekdo cizi, mel by idealne hned poznat, k cemu ta promenna slouzi.
5. Kod by nemely bejt spagety - funkce a tridy se snaz co nejvic rozdrobit. Idealne bys mel kazdou funkci vzdycky celou nacpat na obrazovku + by funkce/trida mela delat vzdycky jen jednu vec. Pokud toho dela vic nebo se prodluzuje, rozdelit.
PC: MSI RTX 4090 Suprim X, AMD Ryzen 9 7950x3D, ASUS Crosshair HERO X6670E, 64GB RAM@6000CL30, Fractal Define Torrent, Seasonic PRIME TX 1600W, SSD Seagate Firecuda 530 M2 2TB +
4TB + 4TB SATA Micron 5200 ECO
Periferie: Samsung Odyssey G9 Neo + 2x AOC AG271QG, Razer Deathadder, Ducky Shine7, Steelseries QcK+, Beyerdynamic MMX300, Valve Index


  • Mohlo by vás zajímat
    Odpovědi
    Zobrazení
    Poslední příspěvek
  • Turbo Pascal (With DOSBox) je pomalý.
    od Kopusek » 01 pro 2023 11:00 » v Programování a tvorba webu
    2
    2006
    od Kopusek Zobrazit poslední příspěvek
    02 pro 2023 10:13
  • Pomoc s výběrem HW
    od adelafridrichova » 13 dub 2023 20:41 » v Rady s výběrem hw a sestavením PC
    6
    2109
    od Karrex Zobrazit poslední příspěvek
    14 dub 2023 14:09
  • Pomoc se sestavením PC 45-50K
    od Kvp2 » 03 lis 2023 23:27 » v Rady s výběrem hw a sestavením PC
    22
    2624
    od Kvp2 Zobrazit poslední příspěvek
    12 lis 2023 20:39
  • Pomoc s výběrem SSD disku
    od eli125 » 25 dub 2023 12:37 » v Rady s výběrem hw a sestavením PC
    1
    1179
    od Zivan Zobrazit poslední příspěvek
    25 dub 2023 15:07
  • pomoc v oblasti grafiky
    od showpayne » 07 srp 2023 19:08 » v Vše ostatní (Off topic)
    0
    1375
    od showpayne Zobrazit poslední příspěvek
    07 srp 2023 19:08

Zpět na “Programování a tvorba webu”

Kdo je online

Uživatelé prohlížející si toto fórum: Žádní registrovaní uživatelé a 6 hostů