Разворот

Дано натуральное число N и последовательность из N элементов. Требуется вывести эту последовательность в обратном порядке.

Входные данные
В первой строке входного файла INPUT.TXT записано натуральное число N (N ≤ 1000). Во второй строке через пробел идут N целых чисел, по модулю не превосходящих 103 - элементы последовательности.
Выходные данные
В выходной файл OUTPUT.TXT выведите заданную последовательность в обратном порядке.
Пример

№	INPUT.TXT	OUTPUT.TXT
1	3 1 2 3	3 2 1

Решение

var n,i:integer;

  a:array[1..1000] of integer;

 

     f,f1:text; 

  begin

    assign(f,'input.txt'); 

    reset(f); 

    readln(f,n);

    for i:=1 to n do

     read(f,a[i]);

    close(f); 

     assign(f1,'output.txt'); 

     rewrite(f1); 

     for i:=n downto 1 do

    write(f1,a[i],' ');  close(f1); 

  end.