Информатика Архивный вопрос

Дана последовательность чисел А длины N. Требуется вывести в обратном порядке.
Первая строка входного файла содержит целое число N (1 <= N <= 1000000) - длину
последовательности. Вторая строка входного файла содержит N целых чисел - элементы
последовательности A. Все элементы последовательности не превосходят 100000 по
абсолютному значению.
В единственной строке выходного файла выведите элементы последовательности A в
обратном порядке. Для наглядности обратите внимание на примеры.

Нет комментариев

Ответы

Гость

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.

Нет комментариев