abclinuxu.cz AbcLinuxu.cz itbiz.cz ITBiz.cz HDmag.cz HDmag.cz abcprace.cz AbcPráce.cz
AbcLinuxu hledá autory!
Inzerujte na AbcPráce.cz od 950 Kč
Rozšířené hledání
×
    včera 17:11 | Komunita

    Konference OpenAlt 2025 hledá přednášející. Proběhne o víkendu 1. a 2. listopadu na půdě Fakulty informačních technologií VUT v Brně. Témata konference jsou: Otevřený a svobodný software, IoT a Hnutí tvůrců, Vzdělávání, Bezpečnost a soukromí, Otevřená společnost, komunity a data, OpenMobility a další.

    Ladislav Hagara | Komentářů: 0
    včera 15:33 | Zajímavý článek

    Nové číslo časopisu Raspberry Pi zdarma ke čtení: Raspberry Pi Official Magazine 153 (pdf)

    Ladislav Hagara | Komentářů: 0
    včera 12:22 | Komunita

    Byl publikován květnový přehled dění a novinek z vývoje Asahi Linuxu, tj. Linuxu pro Apple Silicon. Vývojáře lze podpořit na Open Collective a GitHub Sponsors.

    Ladislav Hagara | Komentářů: 0
    15.5. 21:33 | Nová verze

    Programovací jazyk Rust (Wikipedie) dnes slaví 10 let od vydání verze 1.0. Přímo na oslavě byla vydána nová verze 1.87.0. Podrobnosti v poznámkách k vydání. Vyzkoušet Rust lze například na stránce Rust by Example.

    Ladislav Hagara | Komentářů: 0
    15.5. 14:44 | IT novinky

    Evropská komise obvinila provozovatele čínské platformy TikTok z porušování pravidel EU kvůli netransparentnosti v reklamě. Komise, která v EU plní i funkci antimonopolního úřadu, to dnes uvedla v tiskové zprávě. TikTok, který patří čínské firmě ByteDance, se může k předběžnému nálezu vyjádřit. Pokud ale podezření komise nevyvrátí, hrozí mu pokuta až do šesti procent z ročního globálního obratu.

    Ladislav Hagara | Komentářů: 16
    14.5. 20:44 | Komunita

    Sovereign Tech Agency (Wikipedie), tj. agentura zabezpečující financování svobodného a otevřeného softwaru německou vládou, podpoří GFortran částkou 360 000 eur.

    Ladislav Hagara | Komentářů: 0
    14.5. 14:00 | IT novinky

    Microsoft hodlá zrušit zhruba tři procenta pracovních míst. Microsoft na konci loňského června zaměstnával kolem 228.000 lidí. Tři procenta z tohoto počtu představují téměř 7000 pracovních míst.

    Ladislav Hagara | Komentářů: 16
    14.5. 13:33 | IT novinky

    V říjnu loňského roku provedl Úřad pro ochranu hospodářské soutěže (ÚOHS) místní šetření u společnosti Seznam.cz. Krajský soud v Brně tento týden konstatoval, že toto šetření bylo nezákonné.

    Ladislav Hagara | Komentářů: 16
    13.5. 22:22 | Bezpečnostní upozornění

    Branch Privilege Injection (CVE-2024-45332, Paper) je nejnovější bezpečnostní problém procesorů Intel. Intel jej řeší ve včerejším opravném vydání 20250512 mikrokódů pro své procesory. Neprivilegovaný uživatel si například může přečíst /etc/shadow (YouTube).

    Ladislav Hagara | Komentářů: 2
    13.5. 14:22 | Komunita

    Dle plánu byl vývoj Firefoxu přesunut z Mercurialu na Git. Oficiální repozitář se zdrojovými kódy je na GitHubu.

    Ladislav Hagara | Komentářů: 7
    Jaký filesystém primárně používáte?
     (57%)
     (1%)
     (7%)
     (23%)
     (4%)
     (2%)
     (3%)
     (1%)
     (0%)
     (3%)
    Celkem 627 hlasů
     Komentářů: 26, poslední 8.5. 09:58
    Rozcestník
    Štítky: není přiřazen žádný štítek

    Dotaz: Pascal-změna písmene

    30.8.2011 15:14 sebba
    Pascal-změna písmene
    Přečteno: 503×
    Ahoj, potřebuji poradit jak v TURBO PASCALU provedu následující úlohu Proveďte změnu velkého písmene na malé písmeno ? byl bych rád za kod :) děkuji

    Řešení dotazu:


    Odpovědi

    30.8.2011 15:35 l4m4
    Rozbalit Rozbalit vše Re: Pascal-změna písmene
    http://delphi.about.com/library/rtl/blrtlLowerCase.htm
    30.8.2011 15:45 Šangala | skóre: 56 | blog: Dutá Vrba - Wally
    Rozbalit Rozbalit vše Re: Pascal-změna písmene
    V Turbo Pascalu nezvládnu řešit cizí domácí úkoly, ale pro písmena A-Z v jazyce Ook! by to mohlo vypadat takto (bez ošetření, ale se vstupem a výstupem):
    Ook. Ook? Ook. Ook!
    Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook.
    Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook.
    Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook.
    Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook.
    Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook.
    Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook.
    Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook.
    Ook. Ook. Ook. Ook. Ook. Ook. Ook. Ook.
    Ook! Ook.
    
    To, že trpíš stihomamem, ještě neznamená, že po tobě nejdou. ⰞⰏⰉⰓⰀⰜⰉ ⰗⰞⰅⰜⰘ ⰈⰅⰏⰉ ⰒⰑⰎⰉⰁⰕⰅ ⰏⰉ ⰒⰓⰄⰅⰎ ·:⁖⁘⁙†
    Pavel Stárek avatar 30.8.2011 15:50 Pavel Stárek | skóre: 44 | blog: Tady bloguju já :-) | Kolín
    Rozbalit Rozbalit vše Re: Pascal-změna písmene
    Kurňa není na ty domácí úlohy ještě brzy? Školní rok ještě ani nezačal. Leda by to byl někdo, kdo dělá opravnou zkoušku.
    Kdo chce, hledá způsob; kdo nechce, hledá důvod.
    30.8.2011 16:16 sebba
    Rozbalit Rozbalit vše Re: Pascal-změna písmene
    děkuju za pomoc ! myslel jsem že je tohle poradna a né čekárna v Bohnicích !
    30.8.2011 16:25 Radovan
    Rozbalit Rozbalit vše Re: Pascal-změna písmene
    Nojo, buďto se konečně začal chystat na opravku, a nebo si dělá trochu náskok do nového roku :)

    Podle mě není k tak jednoduché úloze potřeba kód uvádět, stačí když se podíváš na tohle: (nebo tabulku ASCII)

    A=65 ... a=97
    B=66 ... b=98
    C=67 ... c=99

    O kolik se liší každé malé písmeno od svého velkého protějšku?
    30.8.2011 16:29 sebba
    Rozbalit Rozbalit vše Re: Pascal-změna písmene
    Opravky nedělám jen si opakuji ,

    ord ('A' - 'a') ?
    30.8.2011 16:36 Radek Miček | skóre: 23 | blog: radekm_blog
    Rozbalit Rozbalit vše Re: Pascal-změna písmene
    ord ('A' - 'a')
    Tohle nebude fungovat, protože Pascal neumí '-' na znacích.
    30.8.2011 16:42 sebba
    Rozbalit Rozbalit vše Re: Pascal-změna písmene
    co mám dát místo mínus ?
    30.8.2011 17:06 Šangala | skóre: 56 | blog: Dutá Vrba - Wally
    Rozbalit Rozbalit vše Re: Pascal-změna písmene
    Copak dělá fce ord() ?
    To, že trpíš stihomamem, ještě neznamená, že po tobě nejdou. ⰞⰏⰉⰓⰀⰜⰉ ⰗⰞⰅⰜⰘ ⰈⰅⰏⰉ ⰒⰑⰎⰉⰁⰕⰅ ⰏⰉ ⰒⰓⰄⰅⰎ ·:⁖⁘⁙†
    30.8.2011 17:08 Radek Miček | skóre: 23 | blog: radekm_blog
    Rozbalit Rozbalit vše Re: Pascal-změna písmene
    Pascal umí sčítat a odčítat čísla, tudíž je třeba napřed znaky převést na čísla pomocí ord, pak provést aritmetiku a nakonec převést čísla na znaky pomocí chr.
    30.8.2011 17:54 Radovan
    Rozbalit Rozbalit vše Re: Pascal-změna písmene
    V Céčku je to teda jednodušší :-D
    znak+=' ';
    Nebo s kontrolou
    znak=(znak<'A'||znak>'Z')?znak:znak+32;
    30.8.2011 18:40 Šangala | skóre: 56 | blog: Dutá Vrba - Wally
    Rozbalit Rozbalit vše Re: Pascal-změna písmene
    Nebo taky:
    znak = (char) tolower((int) znak);
    a nebo taky, ale to zas úplně jiný jazyk:
    znak := UpCase(znak);
    a pro odvážné taky:
    >,++++++++++++++++++++++++++++++++.
    :-)
    To, že trpíš stihomamem, ještě neznamená, že po tobě nejdou. ⰞⰏⰉⰓⰀⰜⰉ ⰗⰞⰅⰜⰘ ⰈⰅⰏⰉ ⰒⰑⰎⰉⰁⰕⰅ ⰏⰉ ⰒⰓⰄⰅⰎ ·:⁖⁘⁙†
    30.8.2011 19:42 Radovan
    Rozbalit Rozbalit vše Re: Pascal-změna písmene
    A v ještě jiném jazyce by se dal zkonvertovat celý řetězec najednou :-P
    a$=LCASE$(a$)
    30.8.2011 17:07 Ladicek | skóre: 28 | blog: variace | Havlíčkův brod
    Rozbalit Rozbalit vše Re: Pascal-změna písmene
    Nechci kecat, ale pokud se dobře pamatuju, znaky v Pascalu byly ordinální typy, takže nad nimi šlo dělat výčet, indexovat jimi pole a mimo jiné je taky odčítat…

    Ale už fakt nevim.
    Ještě na tom nejsem tak špatně, abych četl Viewegha.
    30.8.2011 17:14 Radek Miček | skóre: 23 | blog: radekm_blog
    Rozbalit Rozbalit vše Re: Pascal-změna písmene
    Pro jistotu jsem to vyzkoušel ve FreePascalu a výsledek:
    Error: Operation "-" not supported for types "Char" and "Char" 
    
    30.8.2011 17:15 Ladicek | skóre: 28 | blog: variace | Havlíčkův brod
    Rozbalit Rozbalit vše Re: Pascal-změna písmene
    Máš pravdu a já se mýlím :-) Sorry.
    Ještě na tom nejsem tak špatně, abych četl Viewegha.
    14.5.2015 18:43 mmm561
    Rozbalit Rozbalit vše Re: Pascal-změna písmene
    Spravne by bylo ord('A')-ord('a') ;-)
    14.5.2015 21:43 Jardík
    Rozbalit Rozbalit vše Re: Pascal-změna písmene
    Jó, ještě že to není 4 roky starý dotaz. Jinak tohle řešení je samozřejmě špatně a řešit takovou úlohu není žádná prdel. Je k tomu potřeba kýbl unicode tabulek a kdo ví, co ještě, třeba nějaký kontext, kde to písmeno je.
    14.5.2015 22:48 Radovan
    Rozbalit Rozbalit vše Re: Pascal-změna písmene
    Hm, a opravdu potřebuješ záporný výsledek?
    30.8.2011 23:18 rastos | skóre: 63 | blog: rastos
    Rozbalit Rozbalit vše Re: Pascal-změna písmene
    Už minule som vravel, že na to spravím FAQ. Tak som spravil. Mohol by niekto skontrolovať, či je to prijateľnou češtinou?
    31.8.2011 00:07 Petr Šobáň | skóre: 80 | blog: soban | Olomouc
    Rozbalit Rozbalit vše Re: Pascal-změna písmene
    Asi tam bude nějaká chyba - mě to po odkazu napsalo:
    Chyba
    
    Parametr relationId je prázdný!
    31.8.2011 07:26 rastos | skóre: 63 | blog: rastos
    Rozbalit Rozbalit vše Re: Pascal-změna písmene
    Moja chyba. Tak ešte raz.
    31.8.2011 09:33 l4m4
    Rozbalit Rozbalit vše Re: Pascal-změna písmene
    tazatel, žádá o pomoctazatel žádá o pomoc

    aby jste se něco naučiliabyste se něco naučili

    konali by jsme v přímém protikladukonali bychom v přímém protikladu

    dělali by jsme prácidělali bychom práci

    řešení, kterému nerozumíte budeřešení, kterému nerozumíte, bude

    A jednotlivé body jsou věty, tudíž by měly začínat velkým písmenem.

    nežádejte, aby jsme za vásnežádejte, abychom za vás
    31.8.2011 09:47 Šangala | skóre: 56 | blog: Dutá Vrba - Wally
    Rozbalit Rozbalit vše Re: Pascal-změna písmene
    Tak jo, a háček v nadpisu :-)
    To, že trpíš stihomamem, ještě neznamená, že po tobě nejdou. ⰞⰏⰉⰓⰀⰜⰉ ⰗⰞⰅⰜⰘ ⰈⰅⰏⰉ ⰒⰑⰎⰉⰁⰕⰅ ⰏⰉ ⰒⰓⰄⰅⰎ ·:⁖⁘⁙†

    Založit nové vláknoNahoru

    Tiskni Sdílej: Linkuj Jaggni to Vybrali.sme.sk Google Del.icio.us Facebook

    ISSN 1214-1267   www.czech-server.cz
    © 1999-2015 Nitemedia s. r. o. Všechna práva vyhrazena.