全國青少年信息学奥赛 —第十届初赛.pptVIP

全国青少年信息学奥赛 —第十届初赛;第十届NOI初赛试题及答案（提高组） ;T2 T3;4.满二叉树的叶节点个数为N,;5.Binary Tree图示;6-7;8.下列哪个网络常用名字缩写是错的? ;10.一台计算机要利用电话线上网;二、不定项选择题（共10题，每题1.5分，共计15分） ;EDVAC资料:一般认为ENIAC机是世界第一台电子计算机.其实英国 “科洛萨斯”计算机比ENIAC机问世早两年 ;12.下列哪些是64位处理器;13.（2004）10+（32）16的结果;14.下列哪个（些）;15.下列哪个（些）不是计算机的存储设备;16. 下列哪个（些）软件属于操作系统（ ）。;17.下列说法中正确的是（ ）;CPU主频就是CPU的时钟频率;CPU主频就是CPU的时钟频率;答案18.ACD 19.ABDE;20.某大学计算机专业的必修课及其先修课如下表,请你判断下列课程安排方案哪些合理;三、问题求解（共2题，每题5分） ;座次;四、?阅读程序（共4题，每题8分，共计32分） ;2. program program2;??var i,number,ndata,sum：integer; data：array[1..100] of integer;??procedure solve(s,sign,n:integer); var I:integer;beginfor i：=s to ndata do begin?? inc(sum,sign * (number div (n * data)));?? solve(i + 1, - sign,n * data); end;??end;??beginread(number,ndata);sum：=0;for i：=1 to ndata do read(data);solve(1,1,1);writeln(sum);??end.输入：1000??3??5??13??11输出：___________。 ;3. program progarm3;??var c：array[1..3] of string[200]; s：array[1..10] of integer; m,n,i:integer;??procedure numara;??var cod：boolean; i,j,nr：integer;?begnfor j：=1 to n do begin??nr：=0；cod：=true;??for i:：=1 to m do ???? if c[i,j] = ‘1’ then beign????????if not cod then begin?????????? cod：=true; inc(s[nr]); nr：=0；?????????? end;????????end????????else begin??????????if cod then begin nr：=1; cod：=false; end ????????????????????else inc(nr);??????????end;if not cod then inc(s[nr]);end;??end;;4. program program4;??constu：array[0..2] of integer = (1, -3, 2);v：array[0..1] of integer = (-2, 3);??var i,n,sum：integer;??function g(n：integer)：integer;??var i,sum：integer;??beginsum：=0；for i：=1 to n do inc(sum,u[i mod 3] * i);g：=sum;??end;??beginsum：=0;read(n);for i：=1 to n do inc (sum,u[i mod 2] * g(i));writeln;??end.输入：103输出：__________. ;五、?完善程序（前5空，每空2分；后6空，每空3分，共28分） ;program progaram1;var ?i,k,m,start：longint;??find：boolean;function check（remain:integer）：boolean;var result：integer;begin??result：=____(1)____ mod remain;?