（阿里巴巴）：m:=879；停止：=25；c:=0；版本：=int_reverse（m）；而m<>rev和c<stop-do-inc（c）；写（m，“”）；m：=m+转速；rev：=int_reverse（m）；结束；
（PARI）版本（x）={本地（d）；r=0；while（x>0，d=x-10*（x\10）；x\=10；r=r*10+d）；return（r）}{for（n=0200，if（n，a+=Rev（a），a=879）；write（“b063051.txt”，n，“”，a））}[哈里·史密斯，2009年8月16日]
（哈斯克尔）
a033651 n=a033651_列表！！n个
a033651_llist=迭代a056964 9--莱因哈德·祖姆凯勒2011年9月22日
