O desafio que nos foi proposto foi o seguinte: fazer um algoritmo que pergunte quantos números queremos usar para escrever uma certa sequência de números e, que depois de escrita, o output do programa seja essa sequência ao contrário. Para tal, recorreu-se a um array (ou vetor) que, no fundo, funciona como uma função matemática, pois a cada valor de i corresponde um valor vt[i].

Código:

Program vetor_contador_inverso ;
var vt:array[1..100]of integer;
n,i:integer;
Begin
write('Quantos números queres? ');
readln (n);
writeln('Introduz ',n,' números ');
//escrever os numeros

for i:=1 to n do
readln (vt[i]);
for i:=1 to n do
write ((vt[n+1-i]), ' ');

End.
____________________________

Por exemplo, para n=4 temos

i
vt[i]
vt[n+1-i]
1
1
vt[4+1-1] = vt[4] = 9
2
8
vt[4+1-2] = vt[3] = 5
3
5
vt[4+1-3] = vt[2] = 8
4
9
vt[4+1-4] = vt[1] = 1

 

Voltar