Troca de valores de variáveis

No exemplo abaixo mostro como armazenar um valor em uma variável e depois troca-lo pelo outro valor.
O time do Bahia tem 5 gols, o time do Santos tem 4 gols, mas quero inverter o resultado na tela, então guadarei os gols do santos, em uma outra variavel(reservado), então farei o seguinte.
__________________________________________________________________________________
program troca_valores;

var bahia, santos, reservado: real;

begin
     bahia :=5;
     santos :=4;
     reservado := bahia;
     bahia := santos;
     santos := reservado;
     writeln('bahia tem agora.::::: ',bahia);
     writeln('santos tem agora.::::: ',santos);
     readln();

end.

Notem que os gols estavam pré definidos, bahia=5 e santos=4, na tela estará ao contrario.
entenda, eu guardei a variável do bahia que era 5, na variável(reservado), e depois disse que bahia era a variável santos ou seja 4, então disse que santos era a variável reservado que passou a ter o valor do bahia 5
e mandei colocar na tela o valor do bahia que que ficou guardado na variável reservado e passou a ser do santos e o valor do santos que passou a ser do bahia.
Esse exemplo mostra como você guardar um valor para ser usado depois.