【程序35】
题目:输入数组,最大的与第一个元素交换,最小的与最后一个元素交换,输出数组。 【程序36】
题目:有n个整数,使其前面各数顺序向后移m个位置,最后m个数变成最前面的m个数 【程序37】
题目:有n个人围成一圈,顺序排号。从第一个人开始报数(从1到3报数),凡报到3的人退出圈子,问最后留下的是原来第几号的那位。 【程序41】
题目:海滩上有一堆桃子,五只猴子来分。第一只猴子把这堆桃子凭据分为五份,多了一个,这只猴子把多的一个扔入海中,拿走了一份。第二只猴子把剩下的桃子又平均分成五份,又多了一个,它同样把多的一个扔入海中,拿走了一份,第三、第四、第五只猴子都是这样做的,问海滩上原来最少有多少个桃子? 【程序44】
题目:一个偶数总能表示为两个素数之和。 【程序45】
题目:判断一个素数能被几个9整除 【程序47】
题目:读取7个数(1—50)的整数值,每读取一个值,程序打印出该值个数的*。 【程序48】
题目:某个公司采用公用电话传递数据,数据是四位的整数,在传递过程中是加密的,加密规则如下:每位数字都加上5,然后用和除以10的余数代替该数字,再将第一位和第四位交换,第二位和第三位交换。
编程试题集:
1、求质因数,从键盘上输入一个数,求这一个数的所有互质的因子。 若输入:36
则输出:2 2 3 3
16
2、求1000以内的亲和数:即某两个数的真因子之和互等,称这两个数为一对相亲数。
如:220的真因子之和为:1+2+4+5+10+11+20+22+44+55+110=284 然而,284的真因子之和为:1+2+4+71+142=220。故220与284为一对亲和数。 X=1
DO WHILE X<=999 I=1 S=0
DO WHILE I<=X IF MOD(X,I)=0 S=S+I ENDIF I=I+1 ENDDO Y=1
DO WHILE Y<=999 K=1 T=0
DO WHILE K<=Y IF MOD(Y,K)=0 T=T+K ENDIF K=K+1 ENDDO
IF S=X AND Y=T
? STR(X,3)+\和\,3)+\是亲和数\ ENDIF Y=Y+1 ENDDO X=X+1
17
ENDDO
3、求[1000,2000]之间的最小的素数。
4、若两素数之差为2,则称这两个素数为双胞胎数,求[2,300]之内的最大的一对双胞胎数。
18
5、求所有的“水仙花数”。所谓“水仙花数”是指一个三位的正整数,其每位数字的立方和等于它本身。如:153=1^3+3^3+5^3
6、求所有两位数中的可逆素数。所谓可逆素数是指某个数及其逆数均为素数。如:11与11, 13与31等
19
7、求1000以内的同构数。所谓“同构数”是指某个数在它的平方的右边出现,则称它们互为同构数。如:5与25 , 6与36, 25与625等
for x=2 to 1000 k=10 d=x*x
if x>10 k=100 endif
if x>100 k=1000 endif
if mod(d,k)=x
20