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

Первая строка входного файла содержит целое число N (1 < = N < = 1000000) - длину

последовательности. Вторая строка входного файла содержит N целых чисел - элементы

последовательности A. Все элементы последовательности не превосходят 100000 по

абсолютному значению.

В единственной строке выходного файла выведите элементы последовательности A в

обратном порядке. Для наглядности обратите внимание на примеры.

Question

Информатика

Иша

18 января, 01:55

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

Первая строка входного файла содержит целое число N (1 < = N < = 1000000) - длину

последовательности. Вторая строка входного файла содержит N целых чисел - элементы

последовательности A. Все элементы последовательности не превосходят 100000 по

абсолютному значению.

В единственной строке выходного файла выведите элементы последовательности A в

обратном порядке. Для наглядности обратите внимание на примеры.

+5

Ответы (1)

Знаете ответ на вопрос?

Раида · Answer 1

Var

a: array of - 100000 ... 100000;

n, i: longint;

input, output : text;

begin

assign (input, 'input. txt') ;

assign (output, 'output. txt') ;

reset (input) ;

rewrite (output) ;

readln (input, n) ;

setLength (a, n) ;

for i:=0 to n-1 do read (input, a[i]) ;

for i:=n-1 downto 0 do write (output, a[i]) ;

close (input) ; close (output) ;

end.