Pascal: úplný začátek

Programovací jazyk Pascal lze spustit napsáním TP [Enter] a objeví se prostředí Turbo Pascalu.

Na lepších počítačích je možné použít BP [Enter], tedy Borland Pascal, což je v podstatě totéž, ale s větším komfortem. Přesto doporučuji spíše Turbo, neboť je menší a pro naše účely stačí.

V prostředí Turbo Pascalu:
AkceMenu [F10][Alt]+Key
Nový program[F]ile, [N]ew[F], [N]
Otevřít program[F]ile, [O]pen[F], [O][F3]
Uložit[F]ile, [S]ave[F], [S][F2]
Přeložit[C]ompile, [C]ompile[C], [C][F9]
Spustit[R]un, [R]un[R], [R][Ctrl]+[F9]
Ukázat obrazovku[D]ebug, [U]ser screen[F5][Alt]+[F5]
Konec[F]ile, E[x]it[X][Alt]+[X]

Nejjednodušší program v pascalu vypadá následovně:

                 {do složených závorek se píší poznámky}
Program Jmeno;   {každý řádek končí středníkem! (Klávesa vedle [L])}
Begin            {= začátek programu (za Begin se středník nepíše)}
End.             {= konec programu (za posledním End se píše tečka)}

Tento program nic nedělá. Jeho výhodou je, že je bez chyby, a jde tedy přeložit a spustit — potom to své nic udělá správně.

První příkazy, které něco dělají jsou:
Write('Text'); {Vypíše na obrazovku slovo Text}
WriteLn('Text'); {Vypíše slovo Text a přejde na další řádek}
Read; {Čeká na stisk [Enter]. Vlastně čte z klávesnice.}
Readln; {Čeká na stisk [Enter]. Vlastně čte z klávesnice.}

Texty se píší do apostrofů (taková čárka nahoře, klávesa hned vedle [Enter]).

Příklad:

Program vypisuje různobarevné texty na obrazovku.

Program Barvicky;
Uses CRT;                    {Tenhle řádek umožňuje pracovat s obrazovkou}
Begin
 ClrScr;                     {Smaže obrazovku}
 WriteLn('Barevnej program');
 TextColor(Red);             {Červený text}
 WriteLn('Cervenej text');
 TextBackground(1);          {Modré pozadí}
 TextColor(10);              {Zelený text}
 GotoXY(36,13);              {Piš na řádek 13, sloupec 36}
 Write('Centrum');
 GotoXY(1,23);               {Konec obrazovky}
 TextBackground(0);          {Černé pozadí}
 TextColor(7);               {Šedé písmo}
 WriteLn;                    {Nový řádek — srovná psaní}
 Readln;                     {Čeká na [Enter]}
End.