Дана последовательность чисел А длины 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.
Нет комментариев
Похожие вопросы
Информатика
Свойства информации...
Информатика
Составить программу для решения задачи:задайте целое число ;определите кратно ли оно 5...
Информатика
Как это сохранить и перенести на флешку...

