QQ扫一扫联系
美籍匈牙利数学家 冯·诺依曼 对计算机科学发展所做出的贡献是：（ ）
提出理想计算机数学模型，成为计算机科学理论基础
是世界上第一个编写计算机程序的人
提出存储程序工作原理，并设计出第一台具有存储程序功能的计算机EDVAC
采用集成电路作为计算机的主要功能部件
指出计算机性能将以每两年翻一番的速度向前发展
下列哪个不是CPU（中央处理单元）（ ）
Intel Itanium
DDR SDRAM
AMD Athlon64
AMD Opteron
IBM Power 5
下列网络中常用的名字缩写对应的中文解释错误的是（ ）
WWW(World Wide Web)：万维网
URL（Uinform Resource Locator）：统一资源定位器
HTTP（Hypertext Transfer Protocol）：超文本传输协议
FTP (File Transfer Protocol)：快速传输协议
TCP （Transfer Control Protocol）：传输控制协议
下面哪个部件对于个人桌面电脑的正常运行不是必需的（ ）
cpu
显卡（图形卡）
光驱
主板
内存
下列哪个软件属于操作系统软件（ ）
Microsoft Word
金山词霸
Foxmail
WinRAR
Red Hat Linux
下列哪个不是计算机存储设备（ ）
文件管理器
内存
高速缓存
硬盘
U盘
下列说法中错误的是（ ）
CPU的基本功能就是执行指令
CPU访问内存的速度快于访问高速缓存的速度
CPU的主频是指CPU在1秒内完成的指令周期数
在一台计算机内部，一个内存地址编码对应唯一的一个内存单元
数据中线的宽度决定了一次传递数据量的大小
彩色显示器所显示的五彩斑斓的色彩，是由红色，蓝色和（ ）色混合而成的
紫色
白色
黑色
绿色
橙色
用静电吸附磨粉后转移到纸张上，是那种输出设备的工作方式（ ）
针式打印机
喷墨打印机
激光打印机
笔式绘图仪
喷墨绘图仪
一台计算机如果要利用电话线上网，就必须配置能够对数字信号和模拟信号进行互相转换的设备，这种设备是（ ）
调制解调器
路由器
网卡
网关
网桥
下列哪个不是数据库软件的名称（ ）
MYSQL
SQL Sever
Oracle
金山影霸
Foxpro
下列哪个程序设计语言不支持面向对象的程序设计方法（ ）
C++
Object Pascal
C
Smalltalk
Java
由3个a，1个b和2个c构成的所有字符串中，包含子串“abc”的共有（ ）个
20
8
16
12
24
某车站呈狭长形，宽度只能容下一台车，并且只有一个出入口。已知某时该车站站台为空，从这一时刻开始出入记录为：“进出进进出进进进出出进出”。假设车辆入站的顺序为1,2,3……，则车辆出站的顺序为（ ）
1，2，3，4，5
1，2，4，5，7
1，3，5，4，6
1，3，5，6，7
1，3，6，5，7
二叉树T，已知其前序遍历序列为1 2 4 3 5 7 6，中序遍历序列为4 2 1 5 7 3 6，其后序遍历序列为
4 2 5 7 6 3 1
4 2 7 5 6 3 1
4 2 7 5 3 6 1
4 7 2 3 5 6 1
4 5 2 6 3 7 1
满二叉树的叶节点为N，则它的节点总数为（ ）
N
2N
2N-1
2N+1
2^N-1
十进制2004等于八进制数（ ）
3077
3724
2766
4002
3755
的结果是（ ）
在下图，从端点（ ）出发存在一条路径可以遍历图中的每条边一次，而且仅遍历一次
A
B
C
D
E
某大学计算机专业的必修课及期先修课程如下表所示：
请判断下列课程安排哪个是不合理的（ ）
C0,C6,C7,C1,C2,C3,C4,C5
C0,C1,C2,C3,C4,C6,C7,C5
C0,C1,C6,C7,C2,C3,C4,C5
C0,C1,C6,C7,C5,C2,C3,C4
C0,C1,C2,C3,C6,C7,C5,C4
一个家具公司生产桌子和椅子。现有113个单位的木材。每张桌子要使用20个单位的木材，售价是30元；每张椅子要用16个单位的木材，售价是20元。使用已有的木材生产桌椅（不一定要用光木材）做多可以买_____元钱。
75名儿童去游乐场玩。他们可以骑旋转木马，坐滑行轨道，乘宇宙飞船。已知其中20人这三种东西都玩过，55人至少玩过其中两种。若每玩一样的费用为5元，游乐场总共收入700，可知有_____名儿童没有玩过其中任何一种。
program program1;
Var
a,b,c,d,e:integer;
begin
a:=79 ; b:=34; c:=57;d:=0 ; e:=-1;
if (a<c) or (b>c) then d:=d+e
else if (d+10<e) then d:=e+10
else d:=e-a;
writeln(d);
end.
输出：_____________________。
program program2;
var
i,j:integer;
str1,str2:string;
begin
str1:='pig-is-stupid';
str2:='clever';
str1[1]:='d'; str1[2]:='o';
i:=8;
for j:=1 to 6 do begin
str1[i]:=str2[j];inc(i);
end;
writeln(str1);
end.
输出：_____________________。
program program3;
var
u:array[0..3] of integer;
a,b,c,x,y,z:integer;
begin
read(u[0],u[1],u[2],u[3]);
a:=u[0]+u[1]+u[2]+u[3]-5;
b:=u[0]*(u[1]-u[2] div u[3]+8);
c:=u[0]*u[1] div u[2] * u[3];
x:=(a+b+2)*3-u[(c+3) mod 4];
y:=(c*100-13) div a div (u[b mod 3]*5);
if ((x+y) mod 2=0) then z:=(a+b+c+x+y) div 2;
z:=(a+b+c-x-y)*2;
writeln(x+y-z);
read(a);
end.
输出：_____________________。
program program4 ;
var c:array[1..2] of string[200];
s:array[1..10] of integer;
m,n,i:integer ;
procedure numara;
var cod:boolean;
i,j,nr:integer;
begin
for j:=1 to n do begin
nr:=0;cod:=true;
for i:=1 to m do
if c[i,j]='1' then begin
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;
begin
readln(m,n);
for i:=1 to m do readln(c[i]);
numara;
for i:=1 to m do
if s[i] <>0 then write(i,' ',s[i],' ');
read(i);
end.
输出：_____________________。
三角形内切圆的面积
题目描述：给出三角形三边的边长，求此三角形内切圆的面积。
输入：三个正实数a、b、c（满足三角形三边关系），表示三角形三边边长。
输出：三角形内切圆的面积，结果四舍五入到小数点后2位
输入样例： 3 4 5
输出样例： 3.14
程序：①②③④⑤
Program program1;
Var
a,b,c,r,s,t:real;
begin
read(a,b,c);
s :=( ① )/2;
t:= ② (s*(s-a)*(s-b)*(s-c));
r:=t/s;
writeln(3.1415927 * r * ③ :0: ④ ;
END.
Joseph
题目描述：
原始的Joseph问题的描述如下：有n个人围坐在一个圆桌周围，把这n个人依次编号为1，……，n。从编号是1 的人开始报数，数到m个人出列，然后从出列的下一个人重新开始报数，数到第m个人又出列，……，如此反复直到所有的人全部出列为止。比如当n=6,m=5的时候，出列的顺序依次是5，4，6，2，3，1。
现在的问题是：假设有k个好人和k个坏人。好人的编号是1到k，坏人的编号是k+1到2k。我们希望求出m的最小值，使得最先出列的k个人都是坏人。
输入：
仅有的一个数字是k (0<K<14)。
输出：
使得最先出列的k个人都是坏人的m的最小值。
输入样例：
4
输出样例：
30
程序：
program progaram1;
var
i,k,m,start：longint;
find：boolean;
function check（remain:integer）：boolean;
var result：integer;
begin
result：=____(1)____ mod remain;
if ____(2)____ then begin
start：=result; check：=true;
end
else check：=false;
end;
begin
find：=false;
read(k);
m：=k;
while ____(3)____ do begin
find：=true; start；=0；
for i：=0 to k-1 do
if (not check(____(4)____)) then begin
find：=false; break;
end;
inc(m);
end;
writeln(____(5)____);
end.
