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 13:22 | IT novinky

    Steve Jobs a superpočítač Cray-1 budou vyobrazeny na pamětních jednodolarových mincích vyražených v příštím roce v rámci série Americká inovace. Série má 57 mincí, tj. 57 inovací. Poslední 4 mince budou vyraženy v roce 2032.

    Ladislav Hagara | Komentářů: 4
    včera 12:22 | Pozvánky

    Byl zveřejněn průběžně aktualizovaný program konference OpenAlt 2025 o otevřeném softwaru a datech, IT bezpečnosti, DIY a IoT. Konference proběhne o víkendu 1. a 2. listopadu v prostorách FIT VUT v Brně. Vstup je zdarma.

    Ladislav Hagara | Komentářů: 0
    včera 12:00 | IT novinky

    Senát včera opětovně nepřijal návrh ústavního zákona, který měl do Listiny základních práv a svobod zakotvit právo občanů platit v hotovosti nebo být off-line. Návrh předložila skupina senátorů již v roce 2023. Senát dnes návrh neschválil, ale ani nezamítl. Pokud by ho přijal, dostala by ho k projednání Sněmovna a vyjádřila by se k němu vláda.

    Ladislav Hagara | Komentářů: 9
    16.10. 23:55 | Nová verze

    V programovacím jazyce Go naprogramovaná webová aplikace pro spolupráci na zdrojových kódech pomocí gitu Forgejo byla vydána ve verzi 13.0 (Mastodon). Forgejo je fork Gitei.

    Ladislav Hagara | Komentářů: 0
    16.10. 14:22 | Bezpečnostní upozornění

    Společnost Eclypsium se na svém blogu rozepsala o bezpečnostním problému počítačů Framework. Jedná se o zranitelnost v UEFI umožňující útočníkům obejít Secure Boot.

    Ladislav Hagara | Komentářů: 1
    16.10. 02:33 | Nová verze

    Editor kódů Zed (Wikipedie) po macOS a Linuxu s verzí 0.208.4běží také ve Windows.

    Ladislav Hagara | Komentářů: 7
    15.10. 17:44 | IT novinky

    Apple dnes představil 14palcový MacBook Pro, iPad Pro a Apple Vision Pro s novým čipem M5.

    Ladislav Hagara | Komentářů: 36
    15.10. 13:55 | Nová verze

    Debian pro mobilní zařízení Mobian (Wikipedie) byl vydán ve verzi 13 Trixie. Nová stabilní verze je k dispozici pro PINE64 PinePhone, PinePhone Pro a PineTab, Purism Librem 5, Google Pixel 3a a 3a XL, OnePlus 6 a 6T a Xiaomi Pocophone F1.

    Ladislav Hagara | Komentářů: 2
    15.10. 13:11 | IT novinky

    Operátor O2 představil tarif Datamanie 1200 GB . Nový tarif přináší 1200 GB dat s neomezenou 5G rychlostí, a také možnost neomezeného volání do všech sítí za 15 Kč na den. Při roční variantě předplatného zákazníci získají po provedení jednorázové platby celou porci dat najednou a mohou je bezstarostně čerpat kdykoli během roku. Do 13. listopadu jej O2 nabízí za zvýhodněných 2 988 Kč. Při průměrné spotřebě tak 100 GB dat vychází na 249 Kč měsíčně.

    Ladislav Hagara | Komentářů: 16
    15.10. 12:33 | Bezpečnostní upozornění

    Byly publikovány informace o útoku na zařízení s Androidem pojmenovaném Pixnapping Attack (CVE-2025-48561). Aplikace může číst citlivá data zobrazovaná jinou aplikací. V demonstračním videu aplikace čte 2FA kódy z Google Authenticatoru.

    Ladislav Hagara | Komentářů: 1
    Jaké řešení používáte k vývoji / práci?
     (38%)
     (46%)
     (19%)
     (21%)
     (24%)
     (18%)
     (21%)
     (18%)
     (18%)
    Celkem 231 hlasů
     Komentářů: 14, poslední 14.10. 09:04
    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: 512×
    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: 43 | 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.