Salut
Aidez-moi à résoudre ce problème :
Ecrivez un programme qui saisit un entier naturel non nul n suivi de n réels à placer dans un tableau A. Il remplit un 2eme tableau B par les élements de A en commençant par le dernier. C à d : B[1] contiendra A[n], B[2] contiendra A[n-1] et ainsi de suite.
Mon travail :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Program T;
uses wincrt;
var
n,i,j:integer;
A,B:array[1..100] of integer;
begin
readln(n);
for j:= 1 to n do
    begin
    readln(A[j]);
    end;
for i:= n downto 1 do
    begin
    readln(B[i]);
    end;
end.