计算机历届专升本考试编程题参考答案
时间：2025-04-17
一、 选择结构试题
1. 假设邮费计算方法为：100克以内（含100克）收费5元，超过100克的部分每克加收
0.2元。试编写程序，要求从键盘输入邮寄物品质量，计算并输出邮费。
INPUT “输入邮寄物品质量(克)” TO X
IF X<=100
Y=5
ELSE
Y=(X-100)*0.2+5
ENDIF
?“邮寄费为”,Y,“元”
22. 现有一元二次方程：ax+bx+c=0，其中a、b、c是整数，且a≠0。若存在实根，则输出
“在实数范围内有解”；若不存在实根，则输出“在实数范围内无解”。
INPUT “输入A的值(不等于0)” TO A
INPUT “输入B的值” TO B
INPUT “输入C的值” TO C
IF B*B-4*A*C>=0
?“在实数范围内有解”
ELSE
?“在实数范围内无解”
ENDIF
3. 输入出租车行驶里程S，输出应付车费F。
S和F的关系如下：
6S 3 F 6 (S 3) 1.5S 3
INPUT “输入出租车行驶里程” TO S
IF S<=3
F=6
ELSE
F=6+(S-3)*1.5
ENDIF
?“应付车费为”,F
4. 有一函数:
x y 2x 1
3x 11 x 11 x 10 x 10
编程序，输入X值，输出Y值
INPUT “输入X的值” TO X
IF X<1
Y=X
ELSE
IF X<10
Y=2*X-1
ELSE
Y=3*X-11
ENDIF
ENDIF
?“Y=”,Y
INPUT “输入X的值” TO X
DO CASE
CASE X<1
Y=X
CASE X<10
Y=2*X-1
OTHERWISE
Y=3*X-11
ENDCASE
?“Y=”,Y
5. 完成下面分段函数的计算，程序运行时用户从键盘输入一个数值X，在屏幕上输出Y值。
x2
Y 0 x2 x 0x 0 x 0
INPUT “输入X的值” TO X
IF X>0
Y=X^2
ELSE
IF X=0
Y=0
ELSE
Y=-(X^2)
ENDIF
ENDIF
?“Y=”,Y
6. 某书店开展优惠售书活动，收费方法如下：
（
x≤100）
（100＜x≤500）
（x＞500）
其中：x表示原价，y表示实际收费。试编写程序，要求从键盘输入x，计算输出y。
INPUT “输入原价” TO X
IF X<=100
Y=0.9*X
ELSE
IF X<=500
Y=0.8*X
ELSE
Y=0.7*X
ENDIF
ENDIF
?“实际收费为”,Y
7. 某商场开展优惠促销活动，购物总额不足100元的不打折；购物总额在100元到500元
之间的打9折；购物总额满500元的打8折。计算公式如下：
其中，x为购物总额，y为应付款。编写程序输入顾客的购物总额，输出应付款。
INPUT “输入购物总额” TO X
DO CASE
CASE X<100
Y=X
CASE X<500
Y=0.9*X
CASE X>=500
Y=0.8*X
ENDCASE
?“应付款为”,Y
8. 从键盘输入三个整数x、y、z，输出其中最小的数。
INPUT “输入第一个整数” TO X
INPUT “输入第二个整数” TO Y
INPUT “输入第三个整数” TO Z
SMALL=X
IF Y<SMALL
SMALL=Y
ENDIF
IF Z<SMALL
ENDIF
? “三个数中最小的整数是”,SMALL
9. 从键盘输入三个数，编程求出三个数中的最大数和最小数，并显示输出。
INPUT “输入第一个数” TO A
INPUT “输入第二个数” TO B
INPUT “输入第三个数” TO C
BIG=A
SMALL=A
IF B>BIG
BIG=B
ENDIF
IF B<SMALL
SMALL=B
ENDIF
IF C>BIG
BIG=C
ENDIF
IF C<SMALL
SMALL=C
ENDIF
?“其中最大数为”,BIG
?“其中最小数为”,SMALL
INPUT “输入第一个数” TO A
INPUT “输入第二个数” TO B
INPUT “输入第三个数” TO C
?“其中最大数为”,MAX(A,B,C)
?“其中最小数为”,MIN(A,B,C)
10. 整型变量a，b，c中分别存放各不相同的数值。编写程序，实现a，b，c从大到小排序，
并以此顺序输出排序后的三个数。
INPUT “输入第一个整数” TO A
INPUT “输入第二个整数” TO B
INPUT “输入第三个整数” TO C
IF A<B
T=A
A=B
ENDIF
IF A<C
T=A
A=C
C=T
ENDIF
IF B<C
T=B
B=C
C=T
ENDIF
? A,B,C
二、循环结构试题
11. 求两个整数m和n的最大公约数。
INPUT “输入一个整数” TO M
INPUT “输入另一个整数” TO N
T=MOD(M,N)
DO WHILE T<>0
M=N
N=T
T=MOD(M,N)
ENDDO
?“最大公约数为”,N
12. 从键盘输入一个正整数n，编程求出2n
i 1n ，即1+2+ +n，并将结果显示输出。 222
INPUT “输入一个正整数” TO N
SUM=0
FOR I=1 TO N
SUM=SUM+I*I
ENDFOR
?“SUM=”,SUM
121013. 试使用循环结构编程计算y=2+2+ 2，并输出结果。
Y=0
FOR I=1 TO 10
Y=Y+2^I
ENDFOR
?“Y=”,Y
14. 编程求s=1×2+3×4+5×6+ +99×100的值，并输出结果。
S=0
FOR I=1 TO 100 STEP 2
S=S+I*(I+1)
ENDFOR
?“S=”,S
15. 根据以下公式计算并输出S的值。
S 1 1111 234100
S=0
FOR I=1 TO 100
S=S+1/I
ENDFOR
?“S=”,S
16. 编程输出100~500之间能被7整除的奇数的个数。
N=0 FOR I=100 TO 500 IF I%7=0 AND I%2=1 N=N+1 ENDIF ENDFOR ?“N=”,N
17. 求Sn=a+aa+aaa+aaaa 其中a是一个数字，a的个数为n，a和n由键盘输入
INPUT “输入A的值”TO A
INPUT “输入项数 …… 此处隐藏：3483字，全部文档内容请下载后查看。喜欢就下载吧 ……
计算机历届专升本考试编程题参考答案.doc
将本文的Word文档下载到电脑
上一篇：会计诚信问题思考论文1
下一篇：汽车消费贷款购车合同
