1、【
简答题】
编程序求出100到800之间同时满足除4余1和除5余3条件的数的个数。
[10分]
解析：
clear
n=0
for i=100 to 800
if mod(i,4)=1 and mod(i,5)=3
n=n+1
endif
endfor
?n
2、【
简答题】
编程序，计算在0至70的范围内有多少个数，其每位数的乘积小于每位数的和。
[10分]
解析：
clear
n=0
for i=10 to 70
a=int(i/10)
b=i%10
if a*b<a+b
n=n+1
endif
next
?n
3、【
简答题】
编程序求出1到100之间同时满足除3余2和除4余2条件的数的和。
[10分]
解析：
clear
s=0
for i=1 to 100
if mod(i,3)=2 and mod(i,4)=2
s=s+i
endif
endfor
?s
4、【
简答题】
编程序求出1-600以内的能被5整除的数的平方和。
[10分]
解析：
set talk off
clear
s=0
for i=1 to 600
if mod(i,5)=0
s=s+i*i
endif
endfor
?s
5、【
简答题】
编写程序，统计区间[1000，9999]内所有能被6整除，且千位数字与个位数字之和为5的整数的个数。
[10分]
解析：
clear
n=0
for a=1 to 9
for b=0 to 9
for c=0 to 9
for d=0 to 9
i=a*1000+b*100+c*10+d
if mod(i,6)=0 and a+d=5
n=n+1
endif
endfor
endfor
endfor
endfor
?n
6、【
简答题】
s=1!+2!+3!+....+10!
[10分]
解析：
clear
s=0
t=1
i=1
for i=1 to 10
t=t*i
s=s+t
endfor
?s
7、【
简答题】
1!+2!+3!+....+n! 当s大于61000时结束累加，求n
[10分]
解析：
clear
s=0
t=1
i=1
do while .t.
t=t*i
s=s+t
if s>6100
exit
endif
i=i+1
enddo
?i
8、【
简答题】
2!+4!+6!....+10!
[10分]
解析：
clear
s=0
t=1
i=1
for i=1 to 10
t=t*i
if mod(i,2)=0
s=s+t
endif
endfor
?s
9、【
简答题】
3!+5!+7!+....+9!
[10分]
解析：
clear
s=0
t=1
i=1
for i=1 to 10
t=t*i
if mod(i,2)=1 and i>=3
s=s+t
endif
endfor
?s
10、【
简答题】
求15!
[10分]
解析：
clear
s=0
for i=1 to 15
s=s*i
endfor
?s
11、【
简答题】
下面和程序是求1+3+5+7+9+11+…这样的奇数之和.若累加数大于10000时,则结束累加。
[10分]
解析：
clear
s=0
i=1
do while .t.
s=s+i
if s>10000
exit
endif
i=i+2
enddo
?s
12、【
简答题】
设S=1+1/2+1/3+...+1/N,N为正整数。编程求使S不超过8的最大的N。
[10分]
解析：
clear
s=0
i=1
do while .t.
s=s+1/i
if s>8
exit
endif
i=i+1
enddo
?i-1
13、【
简答题】
设S=1+1/2+1/3+...+1/N,N为正整数。编程求当算到100项时S的值为多少?精确到小数点后两位。
[10分]
解析：
set talk off
clear
s=0
for i=1 to 100
s=s+1/i
endfor
?str(s,10,2)
14、【
简答题】
编写程序，求出1到5000 之间能被3整除的前若干个奇数之和，当和大于 2000 时程序退出。
[10分]
解析：
clear
s=0
for i=1 to 5000 step 2
if mod(i,3)=0
s=s+i
endif
if s>2000
exit
endif
endfor
? s
15、【
简答题】
编写程序，求3+6+12+24+48+ …之和。当累加和大于500时终止累加，输出此时的和。
[10分]
解析：
clear
s=0
i=3
do while .t.
s=s+i
if s>500
exit
endif
i=i*2
enddo
?s
16、【
简答题】
把30元钱分成一元、二元和五元的纸币且纸币数共为15张的分法有多少种？（注：在兑换中一元、二元、五元的纸币数可以为0）。
[10分]
解析：
clear
n=0
for one=0 to 15
for two=0 to 15
for five=0 to 6
if one+two+five=15 and one+two*2+five*5=30
n=n+1
endif
endfor
endfor
endfor
?n
17、【
简答题】
有35个学生一起买小吃，共花钱100元，其中每个大学生花4元，每个中学生花2元，每个小学生花1元，问大、中、小学生的人数分配共有多少种不同的解（去掉某类学生为0的解）？
[10分]
解析：
clear
n=0
for a=1 to 35
for b=1 to 35
for c=1 to 35
if a+b+c=35 and a*4+b*2+c*1=100
n=n+1
endif
endfor
endfor
endfor
?n
18、【
简答题】
已知a>b>c，且a+b+c<30，求满足条件1/(a^2)+1/(b^2)=1/(c^2)的共有多少组。
[10分]
解析：
clear
n=0
for a=1 to 29
for b=1 to a-1
for c=1 to b-1
if a+b+c<30 and 1/a^2+1/b^2=1/c^2
n=n+1
endif
next
next
next
?n
19、【
简答题】
编写程序，求200到800之间素数的个数。
[10分]
解析：
方法1：
clear
n=0
for x=200 to 800
flag=.t.
for i=2 to x-1
if x%i=0
flag=.f.
exit
endif
next
if flag=.t.
n=n+1
endif
next
?n
方法2：
Clear
n=0
for i=200 to 800
for j=2 to i-1
if mod(I,j)=0
exit
endif
endfor
if i=j
n=n+1
endif
endfor
?n
20、【
简答题】
编写程序，求共有几组I、j、k符合算式ijk+kji=2333，其中I、j、k是0~9之间的一位整数。
[10分]
解析：
clear
n=0
for i=0 to 9
for j=0 to 9
for k=0 to 9
if (i*100+j*10+k)+(k*100+j*10+i)=2333
n=n+1
endif
next
next
next
?n
21、【
简答题】
编写程序，统计1000~9999之间的所有满足以下条件的四位数的个数。该四位数是一个完全平方数，其第1位与第3位数字之和为10，第2位与第4位数字之积为12。
[10分]
解析：
clear
n=0
for i=1000 to 9999
for j=1 to int(sqrt(i))
a=int(i/1000)
b=int(i/100)-a*10
c=int(i/10)-a*100-b*10
d=i%10
if i=j*j and a+c=10 and b*d=12
n=n+1
endif
endfor
endfor
?n
线下考试期中/期末考试、集中培训考试
招聘考试在线笔试、大型校招、社招
认证考试岗位认证、职业资格认证、技能考核认证
考试测验学生测验、员工考核、培训考试
新员工培训搭建新员工入职培训体系
岗位培训岗位学习地图、人才培养
知识店铺搭建专属知识店铺、实现知识变现
刷题练习题库刷题、每日一练、打卡练习
知识竞赛党建活动、安全生产活动、协会竟赛
期末考试在线考试考核提高考试管理效率
网课教育直播打卡学习等功能让网课教育更灵活
企业年会组织企业年会闯关答题赢红包活动
学校高校大规模在线考试解决方案
制造行业员工培训体系解决方案
零售行业岗位人才培养解决方案
金融行业专业技能培训解决方案
客服热线:400-886-8169 | 周一至周日 8:00-22:00