Programování v praxi - 1.díl
 x   TIP: Přetáhni ikonu na hlavní panel pro připnutí webu

Programování v praxi - 1.dílProgramování v praxi - 1.díl

 
Hledat
Vybavení pro Laser Game
Spuštěn Filmový magazín
Laser Game Brno
Laser Game Ostrava

Programování v praxi - 1.díl

Google       Google       8. 3. 2007       25 616×

V mém seriálu bych vám chtěl přiblížit programování v jazyce PASCAL v praxi.

Reklama
Reklama

Tento seriál si neklade za cíl naučit vás programovat v Pascalu. Od toho tu už jeden kurz je. Já vycházím z předpokladu, že už programovat alespoň částečně umíte. A tak bych vám chtěl v tomto seriálu ukázat Pascal spíše na praktických příkladech. Tím chci říct, že bych s vámi postupem času chtěl vytvořit několik programů, které se dají v rámci možností Pascalu využít v praxi. Prvním z nich bude program na šifrování textu. Bude schopen načíst libovolný textový soubor a pomocí dvou „kódů“ jej zašifrovat, nebo naopak dešifrovat. Tento program spolu postupně celý napíšeme. Na závěr pak uvedu celý zdrojový kód.


V dnešní první části naprogramujme jednu rutinní proceduru pro ovládání programu. Nejdříve však obvyklý začátek.

Program Enigma;
uses crt;
   begin
      textcolor(white);
      clrscr;
      readkey;
   end;

Pro ty, co neví, co znamená uses crt, je to pouze příkaz, který překladači řekne, že chci používat jednotku crt, která mi dovolí používat některé funkce jako třeba clrscr, jež vymaže všechny znaky na obrazovce; textcolor(white), která změní barvu textu na bílou, nebo readkey, čímž se programu řekne, aby počkal na stisknutí libovolné klávesy a potom pokračoval v běhu programu.

Nyní proceduru press, která po zavolání vypíše text „Stiskněte libovolnou klávesu pro pokračování…“, jenž bude mít červenou barvu a bude blikat (textcolor(red+blink)). Po stisknuti libovolné klávesy bude běh programu pokračovat.

Procedure press;
begin
  textcolor(red+blink);
  writeln("Stiskněte libovolnou klávesu pro pokračování");
  textcolor(white);
  readkey;
end;

To by bylo pro dnešek všechno. Příště si vytvoříme menu, ze kterého budeme vše ovládat a pomalu se pustíme do psaní funkcí pro šifrování a dešifrování textu.

×Odeslání článku na tvůj Kindle

Zadej svůj Kindle e-mail a my ti pošleme článek na tvůj Kindle.
Musíš mít povolený příjem obsahu do svého Kindle z naší e-mailové adresy kindle@programujte.com.

E-mailová adresa (např. novak@kindle.com):

TIP: Pokud chceš dostávat naše články každé ráno do svého Kindle, koukni do sekce Články do Kindle.

Hlasování bylo ukončeno    
0 hlasů
Google
Autor se věnuje programování v PACALU, vyvojovém prostředí Delphi, dále se zajímá o webdesing a tvorbu internetových stránek pomocí HTML, PHP a CSS.

Nové články

Obrázek ke článku Konference: Moderní informační systémy podporují automatizaci

Konference: Moderní informační systémy podporují automatizaci

Současná situace v šíření onemocnění Covid-19 klade na řadu firem nové nároky a mnohé z nich jsou nyní více než kdy jindy závislé na nejmodernějších informačních technologiích. Proto i v oblasti podnikových informačních systémů vidíme rostoucí důraz na automatizaci nebo na důslednou integraci. Také o těchto trendech se bude mluvit na konferenci Firemní informační systémy, která se koná 24.9.2020 v pražském Kongresovém centru Vavruška na Karlově náměstí.

Reklama
Reklama
Obrázek ke článku Nebezpečí ukrytá v USB: z nuly na škvarek za pět sekund

Nebezpečí ukrytá v USB: z nuly na škvarek za pět sekund

Za cenu šesti dolarů lze celkem bez obtíží koupit nový, líbivě vyhlížející flash disk. Přidaná hodnota, které se vám spolu s ním dostane, už tak moc líbivá není. To, co se před pár sekundami tvářilo jako externí disk, se po připojení k počítači změní v důmyslné elektrické křeslo, které vaše zařízení v onen příslovečný škvarek promění za pár sekund. Cílovou skupinou pro koupi takových zařízení by mohli být záškodníci, kteří by tímto způsobem osnovali pomstu třeba vůči záletnému partnerovi. 

Obrázek ke článku Znalosti, dovednosti i prestižní titul MBA: Jde to i moderně a online

Znalosti, dovednosti i prestižní titul MBA: Jde to i moderně a online

Snad nikdy není špatná příležitost na investici do hodnotného vzdělání. Obzvlášť v případě, že absolvent dovede teoretické poznatky přetavit v praktické dovednosti, využitelné při řešení problémů i v komunikaci. Právě na to se specializuje studijní program MBA Řízení informačních technologií, vyučovaný na Business Institutu.

Obrázek ke článku Coding Bootcamp Praha: Obor IT krize nepoznamenala, žádaní jsou weboví vývojáři

Coding Bootcamp Praha: Obor IT krize nepoznamenala, žádaní jsou weboví vývojáři

Pandemie Covid-19 otřásla trhem práce v základech. Dopady krize pocítilo celkově až 45 % zaměstnanců. Není divu, že čím dál větší jistotu přináší obor IT. Ten zůstal krizí téměř nepoznamenán a při nutnosti začít dělat věci na dálku se ještě více ukázalo, jak moc mnohé firmy kvalitní IT potřebují. Do IT nyní přicházejí začátečníci, kteří v něm vidí lukrativní budoucnost a jistotu, ale i freelanceři a zaměstnanci z oborů zasažených krizí

Hostujeme u Českého hostingu       ISSN 1801-1586       ⇡ Nahoru Webtea.cz logo © 20032020 Programujte.com
Zasadilo a pěstuje Webtea.cz, šéfredaktor Lukáš Churý