C :

#include<stdio.h>
 
void main()
{
	int n,k,a[20];
	scanf("%d",&n);
		for(k=1;k<=n;k++)
		{
			scanf("%d",&a[k]);
		   
		}
		for(k=n;k>=1;k--)
		{
			printf("%d",a[k]);
            printf(" ");
           
		}
        printf("\n");
}

C++ :

#include <bits/stdc++.h>
using namespace std;
int main()
{
int a;
cin>>a;
int s[a+1],ss=a;
for(a=a;a!=0;a--)
{
cin>>s[a];
}
for(int sz=0+1;sz!=ss;sz++)
{
cout<<s[sz]<<" ";
}
cout<<s[ss];

}

Pascal :

var
  n,i:longint;
  a:array[1..10000] of longint;
begin
  readln(n);
  for i:=1 to n do read(a[i]);
  for i:=n downto 2 do write(a[i],' ');
  writeln(a[1]);
end.