C :

#include <stdio.h>
void print(int x) 
{ 
printf("%d",x%10); 
if(x>=10) 
print(x/10); 
} 
int main(int argc, char *argv[])
{
    
 
int n, x; 
scanf("%d",&n); 
print(n); 
printf("\n"); 

    


  return 0;
}

C++ :

#include<iostream>
using namespace std;
int s,i;
string a;
int main()
{
    cin>>a;
    s=a.size();
    for(i=s-1;i>=0;i--){cout<<a[i];}
    return 0;
}

Pascal :

var s:string;
    i:longint;
begin
  readln(s);
  for i:=length(s) downto 1 do
    write(s[i]);
  writeln;
end.