神马品牌网中国三权分立:求助：是关于PASCAL的一些题目，我觉得好难~
来源：百度文库 编辑：神马品牌网 时间：2024/05/02 20:28:20
我们刚学2个月，老师就给我们出这些~~555555
4. 一个整数的立方可以表示为两个整数的平方差，如 = 。
编程：输入一个整数N，自动将其写成 。其中，N是integer型数。
提示：注意数据大小范围。
输入输出格式：（采用文件输入输出）
F4.in
1985 {N的大小}
F4.out
1985(3)=1971105(2) – 1969120(2) {()里代表指数}
2. 任意给定平面上三个点A（X1，Y1），B（X2，Y2），C（X3，Y3），试判断这三个点能否构成三角形。能则求出它的面积。
输入输出格式：（采用文件输入输出）
F2.in
0 0 {每行为一个顶点的坐标，行坐标和纵坐标中间以空格隔开}
2 0
2 2
F2.out
2 {2代表三个顶点可以构成三角形，且面积为2；如果不能构成三角形则输出0}
5. 求纯粹素数。纯粹素数是这样定义的：一个素数，去掉最高位，剩下的数仍为素数，再去掉剩下的数的最高位，余下的数还是素数。这样下去一直到最后剩下的个位数也还是素数。求出所有小于N(1000<=N<=3000)的四位的纯粹素数。
输入输出格式：（采用文件输入输出）
F5.in
1000 {N的大小}
F5.out
0 {0代表 小于N的纯粹素数个数为0个}
说明：输出文件第一行是小于N的纯粹素数的个数，接下来每一个是一个纯粹素数。
4. 一个整数的立方可以表示为两个整数的平方差，如 = 。
编程：输入一个整数N，自动将其写成 。其中，N是integer型数。
提示：注意数据大小范围。
输入输出格式：（采用文件输入输出）
F4.in
1985 {N的大小}
F4.out
1985(3)=1971105(2) – 1969120(2) {()里代表指数}
2. 任意给定平面上三个点A（X1，Y1），B（X2，Y2），C（X3，Y3），试判断这三个点能否构成三角形。能则求出它的面积。
输入输出格式：（采用文件输入输出）
F2.in
0 0 {每行为一个顶点的坐标，行坐标和纵坐标中间以空格隔开}
2 0
2 2
F2.out
2 {2代表三个顶点可以构成三角形，且面积为2；如果不能构成三角形则输出0}
5. 求纯粹素数。纯粹素数是这样定义的：一个素数，去掉最高位，剩下的数仍为素数，再去掉剩下的数的最高位，余下的数还是素数。这样下去一直到最后剩下的个位数也还是素数。求出所有小于N(1000<=N<=3000)的四位的纯粹素数。
输入输出格式：（采用文件输入输出）
F5.in
1000 {N的大小}
F5.out
0 {0代表 小于N的纯粹素数个数为0个}
说明：输出文件第一行是小于N的纯粹素数的个数，接下来每一个是一个纯粹素数。
程序就不编了，给你思路吧。
1#用longint表示,两个数分别为(sqr(n）+n) div 2和(sqr（n）－n) div 2（注意，第一个数用第二个数加N生成）
2#用两点间距离公式d=sqrt(sqr(x1-x2)+sqr(y1-y2))算出三个距离abc，然后用海伦公式，先算s=(a+b+c)/2，然后算s=s(s-a)(s-b)(s-c)，如果s<0则够不成三角形，s>0则面积为sqrt(s),s=0么，三角形蜕化成直线或点，这个算不算都无所谓。注意，题中没有提保留小数位数，要的话可以用writeln(x:a:b)这样的场宽解决。
3#先求1位的，求出3,5,7（2肯定舍）,然后逐一加上十位数求出2位数的结果集，然后对求出的2位数，逐一加上百位数，然后逐一验证……，然后在最后找到的4位数里，找出范围里的，计数，输觥?
也可以1到3000先把所有的质数全部找出来，然后做循环去验证，但这样比第一种慢很多。
看着办 TP能通过，FP就更能了。
还有不懂，给我发留言。
第二个题目的答案：
先根据点点距离公式,求出各条边的长度，然后比较大小求出最大的一个
然后看其他两条边之和是否大于第三条边，大于则可以构成三角形
然后因为已经知道了三条边的长度，利用海轮公式：S*S=(s(s-a)(s-b)(s-c))，求出面积，其中s=1/2(a+b+c)即半周长,S是面积
第三道题目
你先求出1000到3000的素数，存在数组里，然后再来一次循环就可以了，不难
另外问一下你第一道题输入的N有上限妈？
那么大的数肯定会溢出的