var
n, a, i: integer;
st: string;
begin
readln(n);
for i := 1 to n do
read(a);
st := st + a;
end;
for i := n downto 1 do
write(st[i], ' ');
end.
var
n, a, i: integer;
st: string;
begin
readln(n);
for i := 1 to n do
begin
read(a);
st := st + a;
end;
for i := n downto 1 do
write(st[i], ' ');
end.