早教吧作业答案频道 -->其他-->
Pascal列出1〜1000内的所有既是完全平方数又是回文数的整数
题目详情
Pascal列出1〜1000内的所有既是完全平方数又是回文数的整数
▼优质解答
答案和解析
关于这个问题,可以从1到31循环,如果这个数的平方是回文数,那么输出.这样只要编一个判断回文的函数并用for循环枚举就可以了参考程序：vari:longint;functionhw(x:longint);vari,l:longint;s:string;beginstr(x,s);l:=length(s);fori:=1toldiv2doifs[i]s[l-i+1]thenexit(false);hw:=true;end;beginfori:=1to31doifhw(i*i)thenwriteln(i*i);end.
看了 Pascal列出1〜1000...的网友还看了以下：
质数和合数判断(1)质数全都是奇数吗?(2)和数全都是偶数吗?(3)两个合数相乘是偶数吗?(4)如 2020-04-11 …
值域（0,+一个横着的8）是什么意思?指数函数x在a上 y=a（x次方）+k为什么不是指数函数?y 2020-05-16 …
已知a,b,c均为正整数,且满足a的平方,b的平方,c的平方,有a为质数,求证2(a+b+1)是完 2020-05-17 …
1）已知存在唯一一对正整数(x,y)满足方程x^2+84x+2008=y^2,求x+y2）已知n为 2020-06-11 …
（1）写出四个连续的正整数，使得它们中的每一个都是某个不为1的完全平方数的倍数，并指出它们分别是哪 2020-06-13 …
甲、乙两支女子曲棍球队在去年的国际联赛中，甲队平均每场进球数为3.2，全年比赛进球个数的标准差为3 2020-06-14 …
——||数学的2题,1.已知2/1×2＝2/1＋2,3/2×3＝3/2＋3,4/3×4＝4/3＋4 2020-06-29 …
已知存在唯一一对正整数(x,y)⋯⋯1）已知存在唯一一对正整数(x,y)满足方程x^2+84x+2 2020-07-17 …
1、写出6个正整数,使得它们中的每一个都是不为1的完全平方数的倍数,请说明计算方法2、求满足下列条 2020-08-03 …
工资算法是否合法①全月总出勤时数=全月出勤天数（H）+全月加班数（H）②日平均时数（H）=全月出勤总 2020-11-06 …