Предмет: Информатика, автор: alexlyapin21

Язык програмирования - Pascal ABC

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

Примечание. В программе запрещается объявлять массивы и использовать циклы (даже для ввода и вывода).

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

Требуется вывести заданную последовательность в обратном порядке.
Примеры

Входные данные
2
3 4
Выходные данные
4 3

Макрой: На си шарпе подойдет?

alexlyapin21: не

alexlyapin21: только на паскале

Макрой: как хотите

Аноним: Тут действительно не нужны не массивы, ни циклы. Сказано же, что последовательность.

iolandavalerypad353: begin
ReadSeqInteger(ReadlnInteger).Reverse.Println;
end.

Аноним: Неверно писать язык Pascal ABC. Во-первых, этот проект закрыт ровно 10 лет назад и компилятор этот достать уже непросто. А во-вторых, в Pascal ABC это задание решить НЕВОЗМОЖНО.

135455: Program _1;
var a,n,i:integer;
a :array [1..10] of integer;
begin
readln(n);
for i:=1 to n do read(a[i]);
for i:=n downto 1 do write(a[i],' ');
end.

135455: ШКОЛОТА!!!

135455: Program _1;
Const k=1000;
type MyArray =array [1..k] of integer;
var a:MyArray;
n,i:integer;
begin
readln(n);
for i:=1 to n do read(a[i]);
for i:=n downto 1 do write(a[i],' ');
end.