Niektoré štandardné funkcie a procedúry jazyka pascal:
Generovanie náhodných čísel:
random(parameter);
Parameter je rozsah výstupných hodnôt. Je to jedno číslo, ktoré hovorí, koľko rôznych hodnôt može funkcia vrátiť.
x:=random (150);
V premennej x budeme mať hodnoty 0 až 149 (keby sme chceli mať 1 - 150, musíme napísať random(150)+1)
Randomize je príkaz, ktorý musíme napísať predtým, ako zavoláme funkciu random, aby nám dávala pri každom spustení programu iné náhodné čísla.
randomize;
for i:=1 to 10 do write(random(10));
Tento program nam vygeneruje 10 náhodných čísel. Kebyže nepoužijeme príkaz randomize, pri každom spustení programu by sme dostali rovnaké čísla.
Procedúry inc,dec (increase, decrease)
Tieto procedúry nám nahrádzajú príkazy sčítania a odčítania. Majú dva parametre, pričom jeden je nepovinný, to znamená že nie vždy sa ním stretneme. V praxi teda máme dva verianty týcho funkcí:
Táto forma znamená to isté ako zápis a:=a+5; V premennej a sa zvýši hodnota o 5.
inc(a,5);
V prípade, že chýba druhý parameter, tak sa to berie akokeby tam bola hodnota 1. To znamená, že tento príkaz robí to isté ako a:=a+1;
inc(a);
Procedúra dec funguje rovnako ako inc, len nesčítava, ale odčítava.
Tento príkaz zmenší hodnotu v premennej a o 5.
dec(a,5);
A analogicky - tento zápis zmenší hodnotu v a o 1.
dec(a);
Príkazy dec a inc nemáte potrebu nikdy použiť, pretože len nahrádzaju niečo, čo už vieme zapísať inak. Je ale dobré vedieť, čo znamenajú a poznať ich. Ich výhoda je aj tá, že vyzerajú pre niekoho možno čitateľnejšie.
Príkaz halt
Príkaz Halt okamžite zastaví program. Majme úlohu, že máme ziatiť, či sa číslo N nachádza v poli Pole.
nasiel:=0;
for i:=1 to 100 do if Pole[i] = N then nasiel:=1;
if nasiel = 0 then writeln('ANO')
else writeln('NIE');
V tomto programe môžeme robiť veľa vecí zbytočných. Môže sa stať, že hneď prvé číslo je N a zvyšok pola prehľadávanme vlastne zbytočne, pretože výsledok už máme. S použitím príkazu halt môžme náš program značne zefektívniť:
for i:=1 to 100 do if Pole[i] = N then
begin
writeln('ANO');
halt;
end;
writeln('NIE');