Strict Standards: Declaration of action_plugin_importoldchangelog::register() should be compatible with DokuWiki_Action_Plugin::register($controller) in /DISK2/WWW/pavel-rimsky.cz/vyuka/wiki/lib/plugins/importoldchangelog/action.php on line 8 Strict Standards: Declaration of action_plugin_importoldindex::register() should be compatible with DokuWiki_Action_Plugin::register($controller) in /DISK2/WWW/pavel-rimsky.cz/vyuka/wiki/lib/plugins/importoldindex/action.php on line 0 Deprecated: Function split() is deprecated in /DISK2/WWW/pavel-rimsky.cz/vyuka/wiki/inc/auth.php on line 154 Deprecated: preg_replace(): The /e modifier is deprecated, use preg_replace_callback instead in /DISK2/WWW/pavel-rimsky.cz/vyuka/wiki/inc/auth.php on line 456 Deprecated: preg_replace(): The /e modifier is deprecated, use preg_replace_callback instead in /DISK2/WWW/pavel-rimsky.cz/vyuka/wiki/inc/auth.php on line 456 Deprecated: preg_replace(): The /e modifier is deprecated, use preg_replace_callback instead in /DISK2/WWW/pavel-rimsky.cz/vyuka/wiki/inc/auth.php on line 453 Strict Standards: Only variables should be passed by reference in /DISK2/WWW/pavel-rimsky.cz/vyuka/wiki/doku.php on line 71
Napište jednoduché šifrovátko. Program přečte znak. Je-li tímto znakem a, napíše z, pro b vypíše y, pro c vypíše x, pro d vypíše w, pro e vypíše v, atd,… pro y vypíše b, a pro z vypíše a.
const {kod znaku 'a' v tabulce znaku} KOD_A = ord('a'); {kod znaku 'z' v tabulce znaku} KOD_Z = ord('z'); var c, {uzivatelem zadany znak} c_sifr: char; {znak po zasifrovani} begin {precteme} writeln('Zadej male pismeno anglicke abecedy.'); read(c); {kod zasifrovaneho znaku je o tolik vlevo od 'z' jako je nezasifrovaneho vpravo od 'a'} c_sifr := char(KOD_Z - (ord(c) - KOD_A)); {vypiseme vysledek} writeln('Zasifrovany znak je ', c_sifr, '.'); end.