تبدیل زبان برنامه نویسی ویژوال به پاسکال

[mahstar]

سلام دوستان عزیز بچه کنکوری ها
میخواستم بدونم چطور میشه یه برنامه راکه به زبان ویژوال نوشته شده به پاسکال تبدیل کنیم یااصلا اگه میتونیدبرنامه ای بنویسید که تمام اعدادی که ازهردوطرف به یک صورت خوانده میشوند راچاپ کن(بین 1تا1000)مثلا121,44,909,....
ممنون ازلطفتون
قربان شماmahstar
BUY

[mmiinnoo]

کد: انتخاب همه

#include<iostream.h>
#include<conio.h>
bool ispalindrom(int num)
{
 int sum=0;
 int pow=10;
 int temp=num;
 while(temp>0)
       {
          sum=(pow*sum)+temp%10;
          temp/=10;
       }
 if(sum==num)
    return true;               
 return false;
}
main()
{
  for(int i=1;i<1000;i++)
      if(ispalindrom(i))
        cout<<i<<",";
  getch();
  return 0;
}