Proměnné a opakování (cyklus FOR)

Programy si nevystačí pouze s tím, co je pevně dáno. Občas je potřeba něco vypočítat, něco zjistit od uživatele, něco spočítat. A údaje si pamatovat. K tomu slouží proměnné — vlastně kousek paměti, který se nějak jmenuje a obsahuje data určitého typu. Typy dat v Pascalu jsou následující:
TypePopisRozsah
Integer Celé číslo -32 768 až 32 767
Real Desetinné číslo
Boolean Logická hodnotaTrue(=ano), False(=ne)
Char Znak
String Text, více znaků0..255 znaků
Byte Celé kladné číslo0..255
Word Celé kladné číslo0..65 535
ShortInt Celé číslo -128..127
LongInt Celé číslo -2 147 483 648..2 147 483 647
Set Množina
Array[x..x]of..Pole
Record Záznam
Pointer Směrník

Proměnné se definují na začátku programu v části nadepsané:

Var
 i: Integer;	{i je celé číslo}
 S: String;	      {S je text}
 a, b: Real;	{a i b jsou desetinná čísla}
 Jmeno: String;	{Jméno je text}

S proměnnými lze v programu provádět různé operace:

i:= 1;		{Nastav i na jedničku}
a:= 15;	{Do a dej 15}
b:= a+i;	{Do b ulož výsledek a+i}
a:= b*a;	{vynásob a×b a ulož do a}
Znaky := znamenají přiřazení.

Obvyklé operace s čísly:
součet a:= b + c;
rozdíl a:= b - c;
součin a:= b * c;
podíl a:= b / c;
celočíselné dělení a:= b mod c;
zbytek a:= b div d;

Celočíselné proměnné najdou své využití, chceme–li něco několikrát opakovat (třeba patnáctkrát). K naprogramování opakování slouží cyklus. For přiřazení to konec do příkaz

For i:=1 to 15 do WriteLn('Opakuji ti to!');

For i:=0 to 7 do 
Begin
 Write(i);
 WriteLn(' Ahoj');
end;

Příklad:
Program Duha;
{                       Duha
     program vypisuje zadané jméno v 16 barvách   }

 Uses CRT;
 Var
  i    : Integer;             { Celé číslo }
  Jmeno: String;              { Text = řetězec znaků }
  Uloz : Byte;                { Číslo 0..255 }
 Begin
  ClrScr;                     { Smazat obrazovku }
  WriteLn('Duhové jméno');    { Nadpis programu }
  WriteLn('------------');
  WriteLn;
  Write('Napis své jméno: '); { Zadání jména }
  Readln( Jmeno );
  Uloz:= TextAttr;            { Zapamatovat si staré nastavení barev }
  For i:=1 to 15 do           { Opakuj patnáctkrát..}
  Begin                       { Začátek toho, co se má opakovat }
   TextColor( i );
   WriteLn( i:2,' ', Jmeno );
  end;                        { Konec opakovaně části}
  TextAttr:= Uloz;            { Obnovit původní nastavení barev }
  WriteLn;
  Readln;
 End.

Struktura programu v Pascalu
Program Jméno;
Uses
seznam unit, např.:
CRT, DOS;
Const
definice konstant, např.:
PREZIDENT = 'Václav Havel';
LUDOLF = 3.1415926538;
Type
definice typů, např.:
Osoba = Record
....
end;
Var
definice proměnných, např.:
i: Integer;
Jmeno: String;
Procedure Jmeno( prom: typ );
Const...
Type...
Var...
Procedure PodProc( prom: typ );
Function PodFunc( prom: typ ): typ;
Begin
End;

...

Function JmenoFce( prom: typ ): typ;
Const
Type
Var
Procedure PodProc( prom: typ );
Function PodFunc( prom: typ ): typ;
Begin
End;

...

Begin
End.