回文素数是指一个数同时为素数和回文数。例：131、191 编写程序，要求输入回文素数的起止范围，将范围内的回文素数显示出来，每行显示5个数，注意每列要准确对齐。 运行事例如下： 请输入回文素数的起止范围： 5 500 5-500范围内的回文素数如下： 5 7 11 101 131 151 181 191 313 353 373 383

阅读以下说明和C程序代码，将应填入(n)处的字句写在对应栏内。

【说明】

下面C程序代码的功能是：对于输入的一个正整数n(100≤n＜1000)，先判断其是否是回文数(正读反读都一样的数)。若不是，则将n与其反序数相加，再判断得到的和数是否为回文数，若还不是，再将该和数与其反序数相加并进行判断，依此类推，直到得到一个回文数为止。例如，278不是回文数，其反序数为872，相加后得到的1150还不是回文数，再将1150与其反序数511相加，得到的1661是回文数。

函数int isPalm(long m)的功能是：将正整数m的各位数字取出存入数组中，然后判断其是否为回文数。若m是回文数则返回1，否则返回0。

【C程序代码】

include ＜stdio.h＞

include ＜stdlib.h＞

int isPalm(long m)

{ /*判断m是否为回文数*/

int i = 0, k = 0;

char str[32];

while (m ＞ 0) { /*从个位数开始逐个取出m的各位数字并存入字符数组str*/

str[k++] =(1)+ '0';

m = m / 10;

}

for(i = 0; i ＜ k/2; i++) /*判断str中的k个数字字符序列是否是回文*/

if ( str[i] != str[(2)] ) return 0;

return 1;

}

int main ( )

{

long n, a, t;

printf("input a positive integer:"); scanf("%ld",&n);

if (n ＜ 100 || n ＞ =1000) return -1 ;

while((3)) { /*n不是回文数时执行循环*/

printf("%ld-＞ ", n);

for(a = 0, t = n; t ＞ 0; ) { /*计算n的反序数并存入a*/

a =(4)*10 + t % 10; t = t / 10;

} /*end of for*/

n =(5); /*与反序数求和*/

} /*end of while*/

printf ("%id\n",n);

system("pause"); return 0;

}

下列程序的功能是：输出10到100之间的所有回文素数。所谓回文素数是指，如果一个数是素数，则该数反序后形成的数也是素数。例如，13是素数，13反序形成得到数为31，31也是素数，则称13为回文素数。

Private Sub Command1 2_Click（ ）

Dim k As Integer，m As Integer，n AsInteger

For k=10 T0 100

If prim(k)Then

m=__________

n=0

Do While m>0

N=n*10+Im Mod l0

M=m/10

Loop

If prim(n)Then

MsgBox k&“，”&n

End If

End If

Next k

End Sub

Public Function prim(n As Integer)As Boolean

Dim j As Integer

For j=2 To n／2

If n Mod J=0 Then

prim=__________

Exit Function

End If

Next j

prim=True

Exit Function

End Function

横线处应填写的内容是（ ）。

A.k Fake

B.k True

C.m False

D.n True

B.判断longint范围内的数是否为素数（包含求50000以内的素数表）：

procedure getprime;

var

i,j:longint;

p:array[1..50000] of boolean;

程序test．c的功能是：计算500～800区间内素数的个数cnt，并按所求素数的值从大到小的顺序，计算其间隔减、加之和，即第1个素数．第2个素数+第3个素数．第4个素数+第5个素数…的值sum。请编写函数count Value实现程序的要求，最后main函数调用函数writeOAT把结果cnt和Sum，输出到文件out．dat中。

试题二（共 15 分）

阅读以下说明和 C 程序代码，将应填入 （n） 处的字句写在答题纸的对应栏内。

[说明]

下面 C 程序代码的功能是：对于输入的一个正整数 n（100≤n<1000） ，先判断其是否是回文数（正读反读都一样的数） 。若不是，则将 n 与其反序数相加，再判断得到的和数是否为回文数，若还不是，再将该和数与其反序数相加并进行判断，依此类推，直到得到一个回文数为止。例如，278 不是回文数，其反序数为 872，相加后得到的 1150还不是回文数，再将 1150 与其反序数 511 相加，得到的 1661 是回文数。 函数 int isPalm(long m)的功能是：将正整数 m的各位数字取出存入数组中，然后判断其是否为回文数。若 m是回文数则返回 1，否则返回 0。

[C 程序代码]

#include <stdio.h>

#include <stdlib.h>

int isPalm(long m)

{ /*判断 m是否为回文数*/

int i = 0, k = 0;

char str[32];

while (m > 0) { /*从个位数开始逐个取出 m的各位数字并存入字符数组 str*/

str[k++] = （1） + '0';

m = m / 10;

}

for(i = 0; i < k/2; i++) /*判断 str中的 k 个数字字符序列是否是回文*/

if ( str[i] != str[ （2） ] ) return 0;

return 1;

}

int main( )

{

long n, a, t;

printf("input a positive integer:"); scanf("%ld",&n);

if (n < 100 || n > =1000) return -1 ;

while( （3） ) { /*n 不是回文数时执行循环*/

printf("%ld -> ", n);

for(a = 0, t = n; t > 0; ) { /*计算 n 的反序数并存入 a*/

a = （4） *10 + t % 10; t = t / 10;

} /*end of for*/

n = （5） ; /*与反序数求和*/

} /*end of while*/

printf("%ld\n",n);

system("pause"); return 0;

}

阅读下列算法说明和代码，将应填入(n)处的语句写在对应栏内。

【说明】

本程序用古典Eratosthenes；筛选法求从2起到指定范围内的素数。如果要找出2～10中的素数，开始时筛中有2～10的数，然后取走筛中最小的数2，宣布它是素数，并把该素数的倍数都取走。这样，第一步以后，筛子中还留下奇数3、5、7、9；重复上述步骤，再取走最小数3，宣布它为素数，并取走3的倍数，于是留下5、7。反复重复上述步骤，直到筛中为空时，工作结束，求得2～10中的全部素数。

【代码】

include ＜stdio.h＞

define MAX 22500

/*程序中用数组sieve表示筛子，数组元素sieve[i]的值为1时，表示数i在筛子中，值为-1时表示数i已被取走*/

main()

{ unsigned int i, range, factor, k;

int sieve[MAX];

printf("please input the range:");

scanf("%d", &range);/* range 指出在多大的范围内寻找素数*/

for(i=2; i＜=range; i++)

(1);

factor=2;

while (factor＜=range)

{ if((2)) /* 筛中最小数是素数 */

{ printf("%d\t", factor);

k=factor;

while (k＜=range) /*移走素数的倍数 */

{ (3);

k=(4);

}

}

(5);

}

}

素数的求法

A.小范围内判断一个数是否为质数：

function prime (n: integer): Boolean;

var I: integer;

在考生文件夹下有一个工程文件sjt5．vbp。在窗体文件中已经给出了全部控件及部分程序。程序运行时，在文本框Text1中输入一个大于2的偶数，并单击“分解为”按钮，则可以将该偶数分解为两个素数之和，且要求其中一一个素数是所能够分解出的最小的素数(一个偶数有时可以分解为多种素数的组合，例如24可以分解为5和19，也可以分解为11和13，要求取含有最小素数的组合，如图8所示)。要求编写“分解为”按钮事件过程中“考生编写程序开始”和“考生编写程序结束”之间的代码．以实现上述功能。过程IsPrime用来判断一个数是否为素数，如果是，返回值为True，否则返叵值为False。 注意：不得修改原有程序和控件的属性。至少正确运行一次程序，且运行时在文本框中输入23456，单击“分解为”按钮，将结果显示在标签中，否则无成绩。最后把修改后的文件按原文件名存盘。