第十九届信息学奥赛复赛题目

第十九届信息学奥赛复赛题目（共1篇）

第十九届信息学奥赛复赛题目 篇1

一、基础知识（每小题5分，共20分）

1、结构化程序设计所规定的三种基本控制结构是（C）

A．输入、处理、输出B．树型、网型、环型

C．顺序、选择、循环D．主程序、子程序、函数

2、Windows中所指的剪贴板就是（D）中的一块区域。

A．高速缓存B.光盘C.硬盘D.内存

3、电脑工作时，断电后，保存在（C）中的信息不会丢失。

A．ROM和RAMB.CPUC.ROMD.RAM4、算式1*2*3*4*5*„„*39*40的结果（A）被37037整除。

A．能B.不能

二、编程题（共80分）

1、有一个等差数列，它的前四项之和为26，之积为880，输出它的前20项。

答案：

CLS

FOR i1 = 1 TO 6

FOR n = 1 TO 5

i2 = i1 + n: i3 = i2 + n: i4 = i3 + n

IF i1 + i2 + i3 + i4 = 26 AND i1 * i2 * i3 * i4 = 880 THEN GOTO 10

NEXT n

NEXT i1FOR i = 1 TO 20

PRINT i1,i1 = i1 + n

NEXT i

END2、数学上有一个称为“角谷猜想”的经典题目：对于一个任意的正整数n，如果n为偶数，则把它除以2，如果n为奇数，则把它乘3再加上1。依此类推，当经过有限次的这种运算后，总可以得到正整数1。

输入n>=2和n<=2013的正整数，键盘输入n，还要输出运算过程。例如：

N=5

5*3+1=16

16/2=8

8/2=4

4/2=2

2/2=1

答案：

CLSINPUT “n=”;n

IF n < 2 OR n > 2013 THEN PRINT “Data error!”: GOTO 10 20 IF n MOD 2 = 0 THEN

PRINT n;“/2=”;

n = n / 2

PRINT n

DO: LOOP WHILE INKEY$ = “"

ELSE

PRINT n;”*3+1=“;

n = n * 3 + 1

PRINT n

DO: LOOP WHILE INKEY$ = ”“

END IF

IF n > 1 THEN 20

END3、用0—9这十个自然数分别组成一个一位数、两位数、三位数和四位数。并且要求这些数都是一个整数的平方，输出所有符合条件的数。每两个数之间用“，”隔开。

答案：

CLS

DIM a(10)

FOR i = 1 TO 3

FOR j = 4 TO 9

FOR k = 10 TO 31

FOR l = 32 TO 99

s1 = i * i: s2 = j * j: s3 = k * k: s4 = l * la(1)= s1

a(2)= s2 10: a(3)= s2 MOD 10

a(4)= s3 100: a(5)=(s3 10)MOD 10: a(6)= s3 MOD 10

a(7)= s4 1000: a(8)=(s4 100)MOD 10: a(9)=(s4 10)MOD 10: a(10)= s4 MOD 10

FOR q = 1 TO 9

FOR w = q + 1 TO 10

IF a(q)= a(w)THEN 10

NEXT w

NEXT q

f = f + 1

PRINT f;”:“;s1;”,“;s2;”,“;s3;”,";s4 10 NEXT l, k, j, i

END