2.找出所有的四位回文数:(回文数就是一个数从左往右读与从右往左读都是同一个数)

来源:百度知道 编辑:UC知道 时间:2024/06/16 11:16:54
2.找出所有的四位回文数:(回文数就是一个数从左往右读与从右往左读都是同一个数)
用pascal语言!!!

给,已经运行确认了:

var i,a,b:integer;
begin
for i:=1000 to 9999 do
begin
a:=i div 100;
b:=i mod 10;
if a=b then writeln(i);
end;
end.

#include <iostream>
#include <stdio.h>
#include <iomanip>
using namespace std;

int main()
{
for(int i = 1000; i < 10000; i++)
{

int m = 0;
int temp = i;
int _new = 0;

for(int j = 0; j < 4; j++)
{

m = temp%10;
temp = temp/10;
_new=_new*10 + m;
}

if(_new == i)
{
cout<<i<<endl;

}
}

system("pause");
return 0;
}