Asta ar fi o implementare in C/C++ a programului (cam ceea ce se face la scoala, daca vrei pascal nu te pot ajuta, scuze)
#include <iostream>
using namespace std;
int n,x,i,z,y,c,k=0;
int main()
{
cin>>n;
for(i=1;i<=n;i++)
{
cin>>x;
y=x; z=0;
while(x!=0)
{
c=x%10;
z=z*10+c;
x=x/10;
}
if(y==z) k++;
}
cout<<k;
return 0;
}