回 帖 发 新 帖 刷新版面

主题:[讨论]请问

我们将左右对称的自然数称为回文数,例如121、4114等;将只能被1与其本身整除的自然数称之为素数,例如7、353等。下列程序完成:键入N,M,求出N至M(含N与M)之间既是回文数又是素数的自然数共有多少个?请完成该程序。
INPUT N,M
DIM X(100)
FOR I=N TO M
Z=0:J=0:T-I
DO WHILE T=0
J=J+1
X(J)=T MOD 10
T=________
LOOP
FOR I=1 TO INT(J/2)
IF X(K)< >_________ THEN Z=1
NEXT K
IF Z=0 THEN 
OR K=2 TO SQR(I)
IF __________ THEN Z=1
NEXT K
IF I=1 THEN Z=1
IF Z=0 THEN ___________
NEXT I
PRINT Y
END
请帮忙!
[em18][em18][em18][em18][em18][em18][em18]

回复列表 (共2个回复)

沙发

[quote]Z=0:J=0:T-I[/quote]
T-I应改为T=I。
[quote]FOR I=1 TO INT(J/2)[/quote]
I应改为K。
[quote]OR K=2 TO SQR(I)[/quote]
OR应改为FOR。

INPUT N,M
DIM X(100)
FOR I=N TO M
Z=0:J=0:T=I
DO WHILE T=0
J=J+1
X(J)=T MOD 10
T=____【1】____
LOOP
FOR K=1 TO INT(J/2)
IF X(K)< >____【2】_____ THEN Z=1
NEXT K
IF Z=0 THEN 
FOR K=2 TO SQR(I)
IF ____【3】______ THEN Z=1
NEXT K
IF I=1 THEN Z=1
IF Z=0 THEN _____【4】______
NEXT I
PRINT Y
END

【1】:T\10
【2】:X(J+1-K)
【3】:I MOD K=0
【4】:Y=Y+1

板凳

INPUT N,M
DIM X(100)
FOR I=N TO M
Z=0:J=0:T-I
DO WHILE T=0
J=J+1
X(J)=T MOD 10
T=___I_____
LOOP
FOR I=1 TO INT(J/2)
IF X(K)< >___X(J+1-K)______ THEN Z=1
NEXT K
IF Z=0 THEN 
OR K=2 TO SQR(I)
IF __I MOD K=0________ THEN Z=1
NEXT K
IF I=1 THEN Z=1
IF Z=0 THEN ___Y=Y+1________
NEXT I
PRINT Y
END

我来回复

您尚未登录,请登录后再回复。点此登录或注册