2017_vf_程例题分类总结.pptVIP

*;特殊数字问题;*;*;*;*;*;*;*;*;*;* *;* *;*;* *;*;*;*;*;*;最大公约数;最小公倍数;整除问题;*;*;非平凡因子;真因子;质因数;*;最大质因数;*;*;*;非约简真分数;*;最简真分数;clean=0for a=2 to 89 分子 for b=50 to 90　　　 分母 if ab 分子应该小于分母 gyz=1 公因子 for x=2 to a if mod(a,x)=0 and mod(b,x)=0 判断分子和分母是否有公约数 gyz=x 有公约数则不是最简真分数 exit endif endfor if gyz=1 没有公约数则是最简真分数 n=n+1 endif endif endforendfor? nreturn ;*;*;*;* *;*;*;*;*;*;*;*;clea s=0 for i=10 to 99 j= _____________________ f1=1 for k=2 to i-1 if mod(i,k)=0 f1=0 endif endfor f2=1 for k=2 to j-1 if mod(j,k)=0 f2=0 endif endfor if_______and _______ s=s+i endif endfor ? s return;*;*;*;*;*;*;*;*;*;*;*;*;*;*;*;*;*;菲波数列;*;*;*;*;*;*;*;*;clea dime f(100) sum1=0 f(1)=1 f(2)=1 f(3)=0 for n=4 to 61 f(n)= f(n-1)-2*f(n-2)+f(n-3) endf for i=11 to 61 sum1=sum1+f(i) endf ?sum1 retu;数 列;*;*;*;*;*;求出100以内最小的自然数 n，使得从1开始的连续 n个自然数的倒数之和大于3.6。; set talk off clear s=0 for n=1 to 100 step 2 a=1/n-1/(n+1) s=s+a if s=0.68 exit endif endfor ? n-2 set talk on return;*;*;人口递增问题;clear s=1 n=2000 do while s2 n=n+1 s=s*1.035 enddo ? n return ;猴吃桃;*;百钱买百鸡;*;百马驮百瓦;set talk off clear s=0 dm=1 do while dm=100/3 xm=1 do while xm=(100-dm*3)/2 mj=100-dm-xm if dm*3+xm*2+ mj/2 =100 s=s+1 endif xm=xm+1 enddo dm=dm+1 enddo ? s return ;整币兑零;12;整币兑零;11; 马克思曾经做过这样一道趣味数学题：有30个人在一家小饭店里用餐，其中有男士、女士和小孩，每个男士花了3先令，每个女士花了2先令，每个小孩花了1先令，共花去50先令。如果要求男士、女士和小孩都有人参与，试求有多少???方案分配男士、女士和小孩的人数?;9;*;*;*;*;矩阵问题;clear dimension a(4,5) S=0 for m=1 to 4 for n=1 to 5 a(m,n) =m+n s=s+a(m,n) endfor endfor ? s return ;*;*;分数转小数;clear a=234 b=569 n=0 for k=1 to 40 a=a*k q=int(a/b) if q=3 n=n+1 endif a=mod(a, b) endfor ? n return;数制转换;clear x=0.987654