第一篇：24点游戏题目
24点游戏题目
1)1118(1+1+1)*8 2)1126(1+1+2)*6 3)1127(1+2)*(1+7)4)1128(1+1*2)*8 5)1129(1+2)*(9-1)6)1134 4*(1+1)*3 7)1135(1+3)*(1+5)8)1136(1+1*3)*6 9)1137 3*(1+1*7)10)1138(1-1+3)*8 11)1139(1+1)*(3+9)12)1144 4*(1+1+4)13)1145 4*(1+1*5)14)1146(1-1+4)*6 15)1147 1*4*(7-1)16)1148(1+1)*(4+8)17)1149(4-1)*(9-1)18)1155(5-1)*(1+5)19)1156(1*5-1)*6 20)1157(1+1)*(5+7)21)1158(5-(1+1))*8 22)1166(1+1)*(6+6)23)1168 6/(1+1)*8 24)1169 6+(1+1)*9 25)1188 8+(1+1)*8 26)1224 4*2*(1+2)27)1225(2+2)*(1+5)28)1226(1+2)*(2+6)29)1227(2+2)*(7-1)30)1228(2-1+2)*8 31)1229 2*(1+2+9)32)1233 3*2*(1+3)33)1234 4*(1+2+3)34)1235(1+2)*(3+5)35)1236 3*(1*2+6)36)1237 1+2+3*7 37)1238 2*(1+3+8)38)1239 1*2*(3+9)39)1244(1+2)*(4+4)40)1245 4*(2-1+5)41)1246(2-1)*4*6 42)1247 2*(1+4+7)43)1248 1*2*(4+8)44)1249 4+2*(1+9)45)1255 1+5*5-2 46)1256(1+5-2)*6 47)1257 1*2*(5+7)48)1258(1+5)/2*8 49)1259 9+(1+2)*5 50)1266 6+(1+2)*6 51)1267(1+7)/2*6 52)1268 1*6/2*8 53)1269 6+1*2*9 54)1277(7*7-1)/2 55)1278 1+7+2*8 56)1279 1+9+2*7 57)1288 8+1*2*8 58)1289 9+2*8-1 59)1333(1+3)*(3+3)60)1334 4*(1*3+3)61)1335 1*3*(3+5)62)1336 3+3*(1+6)63)1337 1*3+3*7 64)1338 3*(1+8)-3 65)1339(1+3)*(9-3)66)1344 1*3*(4+4)67)1345 1+3+4*5 68)1346f 6/(1-3/4)69)1347(1+3)*7-4 70)1348 8+(1+3)*4 71)1349 1+3*9-4 72)1356 1+5+3*6 73)1357(7-3)*(1+5)74)1358 1+8+3*5 75)1359 9+1*3*5 76)1366 6+1*3*6 77)1367(7-3)*1*6 78)1368(1+6/3)*8 79)1369 3*(1+9)-6 80)1377(7-3)*(7-1)81)1378(7-(1+3))*8 82)1379(1+7)*9/3 83)1388(1+3)*8-8 84)1389 1*8*9/3 85)1399(9-1)*9/3 86)1444 4+4*(1+4)87)1445 1*4+4*5 88)1446 4*(1+6)-4 89)1447 1+7+4*4 90)1448 8+1*4*4 91)1449 4*(1+9-4)92)1455 4+(5-1)*5 93)1456f 4/(1-5/6)94)1457 1+4*7-5 95)1458(8-4)*(1+5)96)1459 9+(4-1)*5 97)1466(1+4)*6-6 98)1467(1+7-4)*6 99)1468(1+6-4)*8 100)1469(9-(1+4))*6 101)1477(7-4)*(1+7)102)1478 4*(1+7)-8 103)1479(7-4)*(9-1)104)1488 1*4*8-8 105)1489 1+4*8-9 106)1555f(5-1/5)*5 107)1556 5*(1+5)-6 108)1559(9-5)*(1+5)109)1566 1*5*6-6 110)1567 1+5*6-7 111)1568(1+8-5)*6 112)1569(9-5)*1*6 113)1578(1+7-5)*8 114)1579(9-5)*(7-1)115)1588(1*8-5)*8 116)1589(8-5)*(9-1)117)1599 9+1+5+9 118)1666(6-1)*6-6 119)1668f 6/(1-6/8)120)1669(1+9-6)*6 121)1679(9-6)*(1+7)122)1688(1+8-6)*8 123)1689 9+1+6+8 124)1699 9+1*6+9 125)1779 9+7+1+7 126)1788 8+1+7+8 127)1789 9+1*7+8 128)1799 9+7-1+9 129)1888 8+1*8+8 130)1889 9+8-1+8 131)2223 3*2*(2+2)132)2224 4*(2+2+2)133)2225 2*(2+2*5)134)2227 2*(2*7-2)135)2228(2/2+2)*8 136)2229 2+2*(2+9)137)2233(2+2)*(3+3)138)2234 3*(2+2+4)139)2235 3*(2*5-2)140)2236 2*(2*3+6)141)2237 2*(2+3+7)142)2238 2+2*(3+8)143)2239(2+2)*(9-3)144)2244 2*(4+2*4)145)2245 2+2+4*5 146)2246(2-2+4)*6 147)2247 2+2*(4+7)148)2248 8+(2+2)*4 149)2249 2+4+2*9 150)2255 2*(5+2+5)151)2256 2+2*(5+6)152)2257 2*5+2*7 153)2258 2*(5+8)-2 154)2259 2*(5-2+9)155)2266(2+6)/2*6 156)2267 6+2*(2+7)157)2268 8+2*(2+6)158)2269 2*(2*9-6)159)2277 2*(7-2+7)160)2278 2+8+2*7 161)2288(2+2)*8-8 162)2289 8+2*9-2 163)2333 3*(3+2+3)164)2335 2*(3*5-3)165)2336 2*(3+3+6)166)2337(7-3)*2*3 167)2338(3/3+2)*8 168)2339 9+3*(2+3)169)2344 4+4*(2+3)170)2345 2*(5+3+4)171)2346 2+4+3*6 172)2347 4+2*(3+7)173)2348(8-4)*2*3 174)2349 2*4*9/3 175)2355 2+5*5-3 176)2356 5*2*3-6 177)2357 2+7+3*5 178)2358 8+2*(3+5)179)2359 2+3*9-5 180)2366(2+3)*6-6 181)2367 3*(2*7-6)182)2368 3*(2+8)-6 183)2369 9+3+2*6 184)2377 7+3+2*7 185)2378(2+7)/3*8 186)2379 2*(3*7-9)187)2388 3*(2*8-8)188)2389 8/2*(9-3)189)2399 9+2*3+9 190)2444 2*(4+4+4)191)2445 4*(2+5)-4 192)2446 2+6+4*4 193)2447(7-4)*2*4 194)2448(4/4+2)*8 195)2449 4*(9-2)-4 196)2455 4+2*(5+5)197)2456 5*(2+4)-6 198)2457(4-2)*(5+7)199)2458(2*4-5)*8 200)2459(9-5)*(2+4)201)2466(2+6-4)*6 202)2467 2+4*7-6 203)2468 4*(2+6)-8 204)2469(9-6)*2*4 205)2477 2*(7+7)-4 206)2478 4*(2*7-8)207)2479 9+7+2*4 208)2488 8+2*4+8 209)2489(9-(2+4))*8 210)2499 9+2+4+9 211)2557 5+5+2*7 212)2558(5/5+2)*8 213)2559 9+5+2*5 214)2566(2*5-6)*6 215)2567 7+5+2*6 216)2568 2+5*6-8 217)2569 9+5*6/2 218)2577 7+7+2*5 219)2578(2*5-7)*8 220)2579 5*7-(2+9)221)2588 5*8-2*8 222)2589 9+2+5+8 223)2666 6+6+2*6 224)2667(6+6*7)/2 225)2668(6/6+2)*8 226)2669(9-6)*(2+6)227)2678(2+7-6)*8 228)2679 9+7+2+6 229)2688 8+2+6+8 230)2689(2*6-9)*8 231)2699 2*(9-6+9)232)2778 8+7+2+7 233)2788(2+8-7)*8 234)2789 2*(7+9)-8 235)2888(8/8+2)*8 236)2889(2+9-8)*8 237)2899(9/9+2)*8 238)3333 3*3*3-3 239)3334 3+3*(3+4)240)3335 3*3+3*5 241)3336 3+3+3*6 242)3337 3*(3/3+7)243)3338(3+3-3)*8 244)3339 3*(9-3/3)245)3344 3*(3*4-4)246)3345 4*(3/3+5)247)3346(3-3+4)*6 248)3347 3*(4-3+7)249)3348(8-4)*(3+3)250)3349 3+9+3*4 251)3355 5*5-3/3 252)3356 3+6+3*5 253)3357 3*(3*5-7)254)3359(9-5)*(3+3)255)3366 3*(6/3+6)256)3367 3*(3+7)-6 257)3368(3*3-6)*8 258)3369 9+6+3*3 259)3377f(3/7+3)*7 260)3378 8+7+3*3 261)3379 3+7*9/3 262)3388f 8/(3-8/3)263)3389 3*(3+8)-9 264)3399 9+3+3+9 265)3444 4*(3+4)-4 266)3445 3+5+4*4 267)3446(4/4+3)*6 268)3447 3*(4/4+7)269)3448(3+4-4)*8 270)3449 3*(9-4/4)271)3455 5+4+3*5 272)3456(3+5-4)*6 273)3457 7+5+3*4 274)3458 4*(3+5)-8 275)3459 3*(4+9-5)276)3466 6+6+3*4 277)3468(3*4-8)*6 278)3469 4*(3+9-6)279)3477 3+4*7-7 280)3478 8+(7-3)*4 281)3479 3*(4+7)-9 282)3489 9+3+4+8 283)3499 9+3*(9-4)284)3556(5/5+3)*6 285)3557 3*(5/5+7)286)3558(3+5-5)*8 287)3559 3*(9-5/5)288)3566(3+6-5)*6 289)3567 3*(6-5+7)290)3568 3*(6-5)*8 291)3569 3+5*6-9 292)3578 8+3*7-5 293)3579 9+7+3+5 294)3588 8+3+5+8 295)3589 5+3*9-8 296)3599 9+5*9/3 297)3666(6/6+3)*6 298)3667 3*(6/6+7)299)3668(3+6-6)*8 300)3669 9+6+3+6 301)3677 3*(7-6+7)302)3678 8+7+3+6 303)3679 3*(6+9-7)304)3688(8/8+3)*6 305)3689(3+9-8)*6 306)3699 6+3*9-9 307)3777 7+7+3+7 308)3778(3+7-7)*8 309)3779 3*(9-7/7)310)3788 3*(8/8+7)311)3789 3*(7+9-8)312)3799 3*(9/9+7)313)3888(3+8-8)*8 314)3889(9-8)*3*8 315)3899 9+3*8-9 316)3999 3*(9-9/9)317)4444 4+4+4*4 318)4445 4*(4/4+5)319)4446(4+4-4)*6 320)4447(7-4)*(4+4)321)4448 4*(4+4)-8
322)4449 4+4*(9-4)323)4455 4*(5-4+5)324)4456 4*(5-4)*6 325)4457 4*(4+7-5)326)4458(4+4-5)*8 327)4468 4*(4+8-6)328)4469(9-6)*(4+4)329)4477f(4-4/7)*7 330)4478 4+4*7-8 331)4479 9+7+4+4 332)4488 8+4+4+8 333)4489 4*9-(4+8)334)4555 4+5*5-5 335)4556(4+5-5)*6 336)4557 4*(7-5/5)337)4558(4-5/5)*8 338)4559 9+4*5-5 339)4566 4*(6/6+5)340)4567 4*(5+7-6)341)4568(4+5-6)*8 342)4569 9+6+4+5 343)4577 4*(7/7+5)344)4578 8+7+4+5 345)4579 5+4*7-9 346)4588 4*(8/8+5)347)4589 4*(5+9-8)348)4599 4*(9/9+5)349)4666(4+6-6)*6 350)4667(7-6)*4*6 351)4668 8+6+4+6 352)4669 4*9-(6+6)353)4677 7+7+4+6 354)4678(4+6-7)*8 355)4679(7+9)/4*6 356)4688 8+4*6-8 357)4689(9-8)*4*6 358)4699 9+4*6-9 359)4777 4*(7-7/7)360)4778(4-7/7)*8 361)4788(4+7-8)*8 362)4789 4*(7+8-9)363)4799 4*(7-9/9)364)4888(4-8/8)*8 365)4889(4+8-9)*8 366)4899(4-9/9)*8 367)5555 5*5-5/5 368)5556 5+5*5-6 369)5559 9+5+5+5 370)5566(5+5-6)*6 371)5567 6+5*5-7 372)5568 8+6+5+5 373)5577 7+7+5+5 374)5578(5+5-7)*8 375)5588 5*5-8/8 376)5589 8+5*5-9 377)5599 5*5-9/9 378)5666(5-6/6)*6 379)5667 7+6+5+6 380)5668 6+(8-5)*6 381)5669 6*9-5*6 382)5677(5-7/7)*6 383)5678(5+7-8)*6 384)5679 6+(7-5)*9
8 9 3 4 1 1 3 1 9 1 2 6 5 14 1 53 4 7 2 2 2 3 3 2 2 92 4 2 1 2 3 8 2 1 3 9 4 3 7 2 2 4 97 2 34 3 5 1 4 6 9 6 3 3 7 4 1 8 9 5 5 6 1 5 9 9 6 1 8 8 2 2 2 5 2 3 8 2 2 4 7 8 9 9 3 5 6 9 3 7 9 9 8 8 8 1 3 2 5 5 4 2 5 9 1 3 8 8 5 2 7 5 1 2 6 9 6 6 3 25 2 2 52 5 2
5 6 5 1 1 5 6
http://wenku.baidu.com/view/92d3d7b169dc5022aaea002f.html
第二篇：delphi24点游戏
第3章 “速算24”扑克游戏--单元、异常、逻辑
3.1 “速算24”扑克游戏效果说明
“速算24”是一个考察心算能力、有助于开发智力的扑克游戏。在给出4张扑克牌之后，要求应用这些扑克牌数字做数学运算，迅速构造出一个数学表达式，得出结果24。这个游戏的关键在于迅速判断用户输入的表达式是否正确，并做出相应的反馈，告诉用户是算对了还是算错了。游戏的初始界面如图3.1所示。
图3.1 游戏的初始界面
当用户单击“开始”按钮时，系统开始发牌，随机发出4张牌，如图3.2所示为随机开始的一局游戏，给出的4张纸牌分别为“9”，“8”，“9”，“2”。在文本框中输入运算表达式，比如，输入“8*(2+(9-9))”，单击“计算”按钮，系统会出现提示框，显示“您输入的表达式的计算结果为16!”，告诉你该表达式的结果不是“24”，如图3.3所示。单击“确定”按钮，再次在文本框中输入表达式，比如“8*(2+(9/9))”，单击“计算”按钮，系统会出现提示框，显示“您真行，我服了您！”，表明运算正确，如图3.4所示。
图3.2 系统随机发4张纸牌
图3.3 运算式不正确
图3.4 运算式正确
这个游戏具体的规则如下：
（1）单击“开始”按钮，游戏开始，系统将随机发牌。
（2）请迅速在文本框中输入运算表达式，然后单击“计算”按钮。
（3）这时系统会提示您的运算是对了还是错了，在弹出的对话框中单击“OK”按钮，再次输入新的运算表达式，重复上一步，直到您的运算表达式结果正确，这时系统会恭喜您！
（4）如果结果错了还想继续或者中途想计算另一局扑克牌，就单击“重新开始”按钮，得到新一局扑克牌进行游戏。
下面，我们开始循序渐进地创建这个小游戏。在最开始，游戏的界面和效果都会非常简单，在后面我们会逐渐地完善它。
第3章 “速算24”扑克游戏--单元、异常、逻辑
3.2 生成和建立程序(1)在程序中用到了Image组件，用于放置图片。还用到了Timer组件，用于计算用户操作时间。下面我们来生成游戏的基本框架。
3.2.1 Image组件
Image组件在Additional页上，用来在窗口中显示一幅图片。它拥有如下几个主要属性： 1.Picture属性
可以在picture属性中调入图像文件。Delphi支持多种图像格式，如位图（.BMP）、图标（.ICO）、图元（.WFM）、动画光标（.ANI）、JPEG图片（.JPG、.JPEG）等。
2.AutoSize属性
当AutoSize为True时，Image组件将根据它所包含的图像的大小来调整自身的大小；当AutoSize为False时，不论图像有多大，组件将保持设计时的大小。如果组件比图像小，那么只有一部分图像是可见的。
3.Stretch属性
当Stretch为True时，位图图像将根据组件的大小调整自身的大小，当组件大小改变时，上述三种文件也做相应变化。Stretch属性对图标没有作用。
上述的AutoSize和Stretch属性决定了图像在窗口中的显示尺寸。
图3.5演示的3个Image分别为：AutoSize为True，AutoSize为False，Stretch为True的情形。可以看到，Image的原始尺寸比图片宽，矮，在上面的属性设置下，就会有不同的显示效果。
图3.5 AutoSize和Stretch的设置 3.2.2 Timer组件
在Delphi中，组件分可视组件和非可视组件。可视组件是指那些在运行期间仍然能显示的组件，例如Label，Button，Image组件等。非可视组件是指那些在程序界面设计期间可见，而在程序运行时不可见的组件，例如在System页上的Timer组件。
Timer组件能够有规律地触发OnTimer事件，发送信息给应用程序，它是编制应用程序时最为重要的组件之一。
1.Timer组件的属性
Enabled属性表示Timer是打开还是关闭。用Interval属性设置两个OnTimer事件间的间隔，单位是毫秒。将间隔设置为0相当于关闭计时器，Interval是Cardinal类型的，最大值可到4294967295，当然程序中一般不会把Interval设成很大的值。2.Timer组件的使用
Timer是独立的对象，在启动与Windows无关的逻辑和应用事件时极其有用。可以模拟时钟或计时器，可视地显示经过的时间；可以用作系统延时，Delphi提示信息出现只需在该区域停顿几秒，就是Timer组件应用的一个例子；可以检查系统环境、事件，根据结果进行响应；也可以在窗口中闪烁一段正文或图像，提示某种操作或处理正在进行等等。
尽管Delphi的计时器每秒可以产生1000次激发，在编程中还必须注意程序对Timer触发的响应。如果程序处理OnTimer事件的时间超过Interval的设定值，就可能错过事件，因为当下一次触发到来时，系统正忙于处理上一事件，则这次触发就会被忽略。同时要注意其他的Windows应用程序是否会影响Timer的触发。如果后台正运行着一个占用处理器的程序，就可能会导致Timer的触发不准确，从而使前台程序运行出现错误。
这里要强调的是Timer组件是一个非可视组件，可以把它放置到窗体或者其他容器组件上的任何位置。3.实现游戏计时功能
在本章的游戏中，我们加入一个Timer组件，实现游戏的计时功能。
在窗体中加入一个Label组件，将此组件的Caption属性设置为“使用时间”，然后从组件面板上选择System页中的Timer组件。
在Unit1中加入Form1的一个私有成员SpendTime，记录用户计算所用的时间。代码如下所示：
private { Private declarations } SpendTime:Integer;在Form1的onCreate事件中加入如下代码。将SpendTime设置为0，并将Timer1的Enabled属性设置为False，使Timer1组件不能响应OnTimer事件；并将Timer1的Interval属性设置为1000，表示当Timer1有效时，每间隔1000ms（即1秒）发生一次OnTimer事件：
procedure TForm1.FormCreate(Sender: TObject);var i:integer;begin //初始化，设置数组RandomData的长度为4 //并将每个数组元素初始化为零
setLength(RandomData,4);for i := 0 to 3 do RandomData[i]:=0;SpendTime:=0;Timer1.Enabled:=False;Timer1.Interval:=1000;end;然后在标题为“开始”的“开始”按钮的OnClick事件中，加入如下所示的代码，将Timer1的Enabled属性设置为True，使Timer1组件有效，即现在Timer1能响应OnTimer事件，计时开始。并将SpendTime重新设置为0：
Timer1.Enabled:=True;Timer1.Interval:=1000;SpendTime:=0;//将SpendTime重新设为0 再在“计算”按钮的OnClick事件句柄中，增加下面的语句，使Timer1无效：
Timer1.Enabled:=False;最后双击Timer1组件，创建Timer1的OnTimer事件句柄，在其中加入如下所示的代码，将SpendTime加1，并设置Label5的Caption属性：
procedure TForm1.Timer1Timer(Sender: TObject);begin SpendTime:=SpendTime+1;Label5.Caption:='使用时间:'+IntToStr(SpendTime)+'秒';end;这样，每隔1秒钟，程序就刷新一次使用时间。
3.2.3 设计初始界面
按住Shift键，然后单击组件面板中Additional页中的Image组件，这时该组件边缘出现蓝色的边框，并且凹陷下去，表示可以在窗体上连续加入几个Image组件。选择好Image组件后，在窗体的左上角单击，加入1个Image组件，然后依次向右单击鼠标3次，再加入3个Image组件。最后再单击组件面板中最左边的箭头。
为了排列这4个Image组件，先利用Shift键将它们同时选上，然后右击，选择Align命令，在随后出现的Alignment对话框中的Horizontal选项组中选择Space equally，在Vertical选项组中选择Tops，表示这4个组件顶端对齐，水平方向上间距相等。
按照同样的方法加入4个Label组件、3个Button组件和1个Edit组件。按照表3.1所示设置各个组件的属性。
表3.1 各个组件的属性
组件名 Form1 Label1 属性名 Caption Caption AutoSize WordWrap Caption
属性值 速算24
1.单击“开始”按钮，游戏开始，系统将发出4张扑克牌
False False
2.要求用户利用扑克牌显示的数字，通过加减乘除运算，以最快的速度得出24（可以使用括号），JQKA和“王”算做1。然后在文本框中写好表达式，接
着单击“计算”按钮
Label2
Label3 AutoSize WordWrap Caption
False True
3.这时系统会计算输入表达式的结果，告诉用户是对还是错了。在弹出的对话框中单击“OK”按钮，如果错了可以再次输入新的表达式，重复上一步。直
到您的表达式正确，这时系统会恭喜算对了！
Label4 AutoSize WordWrap Caption AutoSize Caption Caption Caption Text
False True 在下面输入数学表达式
False 开始 计算 退出游戏 空
Button1 Button2 Button3 Edit1
现在同时选择Label1，Label2和Label3，将它们左对齐，垂直方向等距离排列。将Button1，Button2和Button3左对齐，垂直方向等距离排列。
下面放置4个Image组件，用于放置4张纸牌的图片。
先选择Image1，然后切换到对象查看器中的属性编辑器，选择属性选项页中的Picture属性，然后在Picture属性值栏中双击，或单击此属性值旁边的带有省略号的按钮，打开Picture Editor对话框，如图3.6所示。然后单击Load按钮，弹出Load Picture对话框，在此对话框中选择background.bmp文件。最后单击OK按钮，退出Picture Editor对话框。
图3.6 指定图片
使用同样的方法，设定其他3个Image组件的Picture属性。
保存我们的新项目，运行之后界面如图3.7所示，与运行时的界面图3.1稍有不同。这里是设计时界面，只有界面没有事件响应。是程序创建过程中的一个步骤的检验。但是，这个程序还没有什么具体的功能，为了让游戏运行起来，必须添加代码，创建相应的事件处理程序。
第3章 “速算24”扑克游戏--单元、异常、逻辑
生成和建立程序
3.2.4 事件处理
需要添加个事件：第一个用于响应单击开始按钮，在此事件中完成发牌，即随机显示图片；第二个用于响应单击计算按钮，解析用户在文本框中输入的表达式，计算表达式的结果，并判断表达式的结果是否等于；第三个用于响应单击退出游戏按钮，退出游戏（程
序）。
1.数据初始化
创建窗体的事件处理程序，在这里进行必要的初始化。第一步先在Unit1中添加Form1的私有成员数组：
private
{ Private declarations }
RandomData:array of Integer;然后，在对象查看器中选中Form1，选中Event选项卡，在OnCreate一栏对应的右边的空白栏中双击，创建OnCreate函数。添加如下代码。
procedure TForm1.FormCreate(Sender: TObject);
var
i:integer;
begin //初始化，设置数组RandomData的长度为4
//并将每个数组元素初始化为零
setLength(RandomData,4);
for i := 0 to 3 do
RandomData[i]:=0;
end;这里使用一个for循环语句，i是循环变量，格式是：for循环变量:=初值to末值do循环体。你也可以借助Delphi的自动完成功能，在输入for之后按下Ctrl+J键，生成如下代码：
procedure TForm1.FormCreate(Sender: TObject);
begin
for := to do
begin end;
end;在上述代码中，程序首先利用setLength函数设定可变数组RandomData的数组长度为4，然后，将数组的每一个单元都设置为0。这样，就完成了数组的数据初始化工作。
2.“开始”按钮的Click事件处理
（）功能单击开始按钮时，系统就随机地发出张纸牌，显示在个组件中。
（）代码首先，我们需要一个循环变量，一个字符串变量存放随机选取的图片的文件名。创建“开始”按钮的OnClick事件处理程序，在begin前头添加需要的变量，然后在此事件
中加入如下所示的代码。
procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
filename:String;
begin
Randomize;//初始化随机数
for i := 0 to 3 do
begin RandomData[i]:=Random(13)+1;//产生一个1到13的随机数
filename:=IntToStr(RandomData[i])+'.bmp';//根据随机数，得到文件名
//根据i的不同为不同的Image组件载入图像文件
case i of 0 : Image1.Picture.LoadFromFile(filename);1 : Image2.Picture.LoadFromFile(filename);2 : Image3.Picture.LoadFromFile(filename);3 : Image4.Picture.LoadFromFile(filename);
end;
edit1.Text:='';
edit1.SetFocus;
end;
end;在Delphi内部，随机数的产生实际上也是在一套算法的控制之下，Randomize函数用于初始化产生随机数的种子，保证两次产生的随机数不同，而Random(i:integer)则利用初始化过后的随机数种子产生一个1~i之间的随机数。这里i设定为13，以配合扑克牌的张数13。
用来将一个整数转换成一个字符串，和上一章中的的功能恰好相反。我们已经预先准备了位图文件，它们都是形式，文件名则是利用数字命名。中特殊的字符串运算符将两个字符串串联起来，产生一个新的字符串，我们需要的位图文件后缀是，因此，在产生文件名的时候，在数字后面加上这个字符串。语句在上一章中已经讲过，单击开始按钮后，准备接受用户的输入，然后利用方法，把焦点设置到上。是提供的方法之一，用于设置输入
焦点到某个指定的组件。
3.“计算”按钮的OnClick事件
双击“计算”按钮，创建此组件的OnClick事件响应句柄，然后在代码编辑器中加入如下所
示的代码，用于计算用户输入的表达式。
procedure TForm1.Button2Click(Sender: TObject);
var
result:integer;
answer:String;
begin
result:=TotalCompute(Edit1.Text);
if(result=24)then Application.MessageBox('您真行，我服了您!','对了',MB_OK)
else
begin answer:='您输入的表达式的计算结果为'+IntToStr(Result)+'!';Application.MessageBox(PChar(answer),'错了',MB_OK);
end;
end;这段程序根据自定义函数的计算结果判断用户的输入正确与否，并且输出相应的结果以提示
用户。
在语句“result:=TotalCompute(Edit1.Text)”中用到了一个自定义的函数TotalComp-ute，我们用它来计算用户输入的表达式。现在我们还没编写这个函数的代码，所以，目前这段代码是无法运行的。没关系，可以先把它用“//”注释掉，然后随便给 result赋一个值，测试这个事件处理程序的其他部分是否运行正常，例如：
//result:=TotalCompute(Edit1.Text);
result:=24;这样，运行后，单击“计算”按钮后的显示如图3.8所示。
图3.8 成功的提示信息
我们用一个类型的变量存放出错信息，但是函数的第一个参数要求是（字符指针）类型，因此，我们用一个强制类型转换将转换
成。4.“退出游戏”按钮的OnClick事件
双击“退出游戏”按钮，创建此组件的OnClick事件处理程序，然后在代码编辑器中加入如
下所示的代码，用于退出程序。
procedure TForm1.Button3Click(Sender: TObject);
begin
Close;
end;在上一章中我们提到可以用代替，但这里使用来结束程序的运行。这样，可以通过事件来指定在什么条件下窗体可以关闭。
第3章 “速算24”扑克游戏--单元、异常、逻辑
生成和建立程序5.OnCloseQuery事件
当调用方法来关闭窗体时，事件发生。利用事件来指定在什么条件下窗体可以关闭。事件包含一布尔型的参量，可以用它来决定窗体是否关闭。的默认值为。可以利用事件来询问用户是否真的希望马上关闭窗体。我们在这里弹出一个对话框，代码如下所示：
procedure TForm1.FormCloseQuery(Sender: TObject;var CanClose: Boolean);begin if(MessageDlg('现在要退出游戏吗?', mtConfirmation, [mbOk, mbCancel], 0)= mrOk)then canClose:=True else canClose:=False;end;MessageDlg是一种提示对话框，第一个参数是对话框询问的讯息，是一个字符串；第二个参数则代表对话框的类型，mtConfirmation是一个TMsgDlgType的枚举类型，表示这个对话框是个确认对话框。TMsgDlgType类型如下所示：
type TMsgDlgType =(mtWarning, mtError, mtInformation, mtConfirmation, mtCustom);以上定义的对话框类型分别表示：警告、错误、提示、确认和自定义类型。
第三个参数是TMsgDlgBtn类型的集合，这个集合包含了类型为TMsgDlgBtn的按钮，TMsgDlgBtn的定义如下：
type TMsgDlgBtn =(mbYes, mbNo, mbOK, mbCancel, mbAbort, mbRetry, mbIgnore, mbAll, mnNoToAll, mbYesToAll, mbHelp);在我们的程序中，利用了一个集合[mbOK, mbCancle]，表示在对话框中显示两个按钮：OK和Cancel的组合。
最后一个参数是用来描述帮助索引的长整型变量，用来获取提示用户的帮助信息，这里我们没有任何帮助信息，先不管它。函数和用户交互，返回一个类型的数字，预先定义了一套数字，用来直观地表示对话框返回信息。如果用户单击了按钮，这个对话框返回，效果如图所示。
图3.9 关闭窗口时询问用户
现在，我们已经完成了程序的主体部分。第3章 “速算24”扑克游戏--单元、异常、逻辑
单元间的互相引用3.3.1 单元引用的概念
在第章关于单元的知识里，我们已经知道可以定义不包含窗体的单元，它集中定义了程序中使用的函数，这一节里，我们就要实现这样的一个单元，用来实现上面提到的函数。我们可以在任何单元中编写自己的函数，当然包括与窗体相连的单元。可是我们常常需要用到一些常用的函数，这时最好是创建一个不与窗体相连的独立单元，用它来容纳自己的函数，这称为独立的单元文件。当创建了不与窗体相连的独立单元文件后，项目中的其他单元就能很容易地共享这些函数，其他项目也可以很容易地调用这些函数了。对于单元间的引用，要用到语句。3.3.2 uses语句
语句告诉程序在最终的执行代码中需要用到哪些函数和过程。会自动把一些必须的单元包括进来，例如，，等。对于我们自己编写的单元，如果程序中使用了该单元的函数或代码，也需要包括在部分中。语句具有两种类型：公有引用和私有引用。在部分包含的语句代表的是本单元的公有引用，就是说，这部分的引用可以被其他引用本单元的单元继承性地引用。在部分的语句应包含在部分中的代码所需要的单元，去掉那些可以自动加入到程序中的单元。在部分包含的语句代表的是本单元的私有引用，就是说，这部分的引用只能被本单元内部使用。在部分的语句应只包含在部分中的代码所需的单元的名字。对于单元间的引用，要避免交叉引用。假设有两个单元和，如果出现在的部分的语句中，那么单元便不能出现在单元的的语句中。因为这样会产生对单元的循环访问，编译时会出现错误信息。3.3.3 创建另一个单元
创建一个不与窗体相连的单元文件的方法是，首先选择主菜单的命令，然后选择命令，此时弹出一个对话框，如图所示。在此图中选择选项卡中的，然后单击按钮。此时自动为我们创建一个名为的独立单元文件，并显示在代码编辑器中，我们只需在此加入函数即可。
图3.10 New Items对话框
单元创建之后，就需要实现单元之间的互相引用。这里有两种方法：（1）直接在Unit1中写入uses Unit2，代码如下所示：
var Form1: TForm1;implementation uses Unit2;（2）选择主菜单的File | Use Unit命令，此时Delphi弹出Use Unit对话框，如图3.11所示，在此窗口中列出当前文件没有连接的所有文件，只需选择需要连接的文件即可。当选择了某一文件并单击OK按钮后，当前文件就包含了对所选文件的引用。
图3.11 Use Unit对话框
如果当前文件已经连接了当前项目中所有其他文件，选择命令后，就会弹出如图所示的信息窗口，告诉程序员当前文件已经连接了当前项目中所有其他文件。
图3.12 Information对话框
此时再编译，程序就没有任何错误了。现在我们已经创建了，它将用作我们的数学函数定义单元。在开始定义这个单元之前，需要先了解一下关于的异常处理机制。第3章 “速算24”扑克游戏--单元、异常、逻辑
3.4 异 常 处 理
3.4.1 异常处理的概念 在应用程序开发中如何检测、处理程序的运行错误是一个很重要的问题。在 Delphi 的IDE（集成开发环境）中提供了一个完善的内置调试器，可以发现大部分程序错误。但并不是所有的错误都可以被发现，而且当程序涉及到与外设的数据交换或操作外设，如要求用户输入、读写磁盘等时，错误的发生是程序无法控制的，如输入非法字符、磁盘不能读写等。这些情况不仅会导致应用程序异常中止，而且可能引起系统的崩溃。针对这些问题，Delphi提供了一套强大的异常处理机制。巧妙地利用它，可以使程序更为强健，使用更为友好。
Delphi异常处理机制建立在Protected Blocks（保护块）的概念上。所谓保护块是指用保留字try和end封装的一段代码。保护块的作用是当应用程序发生错误时自动创建一个相应的Exception（“异常”类）。程序可以捕获并处理这个“异常”类，以确保程序的正常结束以及资源的释放和数据不受破坏。如果程序不进行处理，则系统会自动提供一个消息框。“异常”类是Delphi异常处理机制的核心，也是Delphi异常处理的主要特色。Delphi提供的所有“异常”类都是类Exception的子类。用户也可以从类Exception派生一个自定义的“异常”类。
3.4.2 资源保护方式
回收分配的资源是确保程序健壮性的一个关键。但默认情况下异常发生时程序会在出错点自动退出当前模块，因此需要一种特殊的机制来确保即使在异常发生的情况下，释放资源的语句仍能被执行，而Delphi的异常处理正提供了这种机制。
Delphi提供了一个保留字finally，用于实现资源的保护。
{分配资源}
try {资源使用情况} finally {释放资源}
end;try„finally„end就形成了一个资源保护块。finally后面的语句在任何情况下（不论程序是否发生异常）都会执行。
在异常保护的情况下，当异常发生时，系统会自动弹出一个消息框，在框中显示异常的消息。退出当前模块后异常类自动清除。
3.4.3 异常响应方式
异常响应为开发者提供了一个按需进行异常处理的机制。try„except„end形成了一个异常响应保护块。与finally不同的是：正常情况下except 后面的语句并不被执行，而当异常发生时程序自动跳到except处，进入异常响应处理模块。当异常被响应后异常类自动清除。
下面是异常响应方式的一般代码：
try {程序正常功能} except on ESomething do {响应特定异常} else {提供默认响应} end;保留字on„do用于判断异常类型。必须注意的是：except后面的语句必须包含在某一个on„do模块中，而不能单独存在。这是又一个与finally不同的地方。
3.4.4 提供默认响应
在异常响应模块中，一般我们只对希望响应的特定异常进行处理。如果一个异常发生而响应模块并没有包含对它的处理代码，则退出当前响应模块，异常类仍被保留。
为了保证任何异常发生后都能在当前响应模块中被清除，可以定义默认响应：
try {程序正常功能} except on ESomething do {响应特定异常} else {提供默认响应} end;由于else可以响应任何异常，包括我们一无所知的异常，因此在默认响应中最好只包括诸如显示一个消息框之类的处理，而不要改变程序的运行状态或数据。
第3章 “速算24”扑克游戏--单元、异常、逻辑
3.5 数学逻辑单元(1)
此游戏程序最关键的地方是如何将用户输入的字符串表达式解析成数学表达式。为了使程序结构清晰明了，我们将此解析代码和程序的主代码分开，单独编写成一个单元。
3.5.1 算法设计
游戏的难点是如何将一字符串形式的表达式解析成计算机能计算的算术表达式。例如对于字符串“3^(4*(9+4))”，如何让计算机解析、计算。
我们的想法是按照数学四则运算规则，先逐层进入最里层的括号，然后在括号内部计算乘方，接着进行乘（除）法运算，最后按顺序进行加（减）运算，当本层括号内部计算完成后，返回结果，去掉括号内部数据，退出到下一级括号（如果有）内进行计算。
这里面涉及的技术细节主要有下面几点：
（1）层层剥离括号，然后从最里层的括号开始计算。（2）对于每一个运算符号，找到符号两侧的数字，形成一个计算式。
（3）每一个子计算式完成后，运算结果返回到原始数列中，作为子串的一部分，继续进行上述计算。
3.5.2 字符串的相关函数
在游戏中，用户输入的都是字符数据，我们需要从这些字符中分析得到数字和运算符号，因此要用到与字符串操作有关的函数。
function Pos(sub , all:string):integer;这个函数含有两个参数：sub表示要查找的字符，all表示原字符串。函数在字符串all中寻找指定的字符sub的位置，如果字符串中不存在sub字符，则函数结果为0。
function LastDelimiter(sub,all :string):integer 这个函数含有两个参数：sub表示要查找的字符，all表示原字符串。函数返回在字符串all中所有查找到的指定字符sub的最后一个的位置，如果字符串中不存在sub字符，则函数结果为0。
function Copy(allstring:string;first,length:integer):string 这个函数的3个参数的含义分别是：allstring代表原来的字符串，first表示拷贝开始的位置，length表示要拷贝的子串长度。函数返回拷贝成功的子串。
procedure Delete(str:string;ppos,length:integer)这个过程用于删除字符串中的一段字符。参数str代表将要操作的字符串，ppos代表开始删除的位置，length表示将要删除多少个字符。function Length(S): Integer;Length函数返回字符串S的长度。
function Trim(const S: string): string;overload;function Trim(const S: WideString): WideString;overload;Trim函数返回字符串S去掉前面和后面的空格后的字符串。
下面的例子给出一个综合利用字符串处理函数编写的一个处理特定字符串的函数，它的功能是：输入一个字符串后，可以返回字符串中两个单括号之间的子字符串，并去掉前面和后面带着的空格：
function GetMyStr(const S: string): string;begin Result:=Trim(Copy(S,Pos('<',S)+1,Pos('>',S)-Pos('<',S)-1));end;比如我们在程序中写到GetMyStr(‘This is a test < Result to output > end of test’);，会得到字符串“Result to output”。
3.5.3 算法的代码编写
基于上述的考虑和知识基础，我们在声明部分定义下列几个主要函数：
（1）AnyLastPos函数定位最后一个算术运算符的位置。
function AnyLastPos(Str:String):integer;（2）AnyFirstPos函数定位最先一个算术运算符的位置。
function AnyFirstPos(Str:String):integer;（3）AnyFirstF函数判断最先出现的符号是+号、-号、*号还是/号。
function AnyFirstF(Str:String):Char;（4）SubCompute函数用于计算不带（）号的加、减、乘、除运算。
function SubCompute(Str:String):integer;（5）TotalCompute函数用于计算表达式的结果。
function TotalCompute(Str:String):integer;1.寻找最后一个算术运算符
定义4个整数变量SubPos，PluPos，MulPos，DivPos，在给定的字符串中寻找+，-，*，/的最后位置，将这些位置存储在上述的4个变量中，然后比较4个符号出现的位置，得到数值最大的运算符；在返回的结果中，返回这个运算符的位置。
程序代码如下所示：
function AnyLastPos(Str:String):integer;var SubPos:integer;PluPos:integer;MulPos:integer;DivPos:integer;Pos:Integer;begin //定位字符串中最后一个运算符的位置
SubPos:=LastDelimiter('-',Str);PluPos:=LastDelimiter('+',Str);MulPos:=LastDelimiter('*',Str);DivPos:=LastDelimiter('/',Str);Pos:=SubPos;if(Pos
分别在给定的字符串中寻找+，-，*，／第一次出现的位置，然后比较4个符号出现的位置，得到数值最小的运算符。在返回的结果中，传递的是这个运算符的位置。
程序代码如下所示：
function AnyFirstPos(Str:String):integer;var SubPos:integer;PluPos:integer;MulPos:integer;DivPos:integer;ForPos:integer;FirstPos:integer;begin //定位字符串中最先一个运算符的位置
SubPos:=Pos('-',Str);PluPos:=Pos('+',Str);MulPos:=Pos('*',Str);DivPos:=Pos('/',Str);ForPos:=Pos('^',Str);FirstPos:=200;if(SubPos=0)then //如果没有-号
SubPos:=200;//将SubPos设置成一个不可能的值
if(PluPos=0)then //如果没有+号
PluPos:=200;//将PluPos设置成一个不可能的值
if(MulPos=0)then //如果没有*号
MulPos:=200;//将MulPos设置成一个不可能的值
if(DivPos=0)then //如果没有/号
DivPos:=200;//将DivPos设置成一个不可能的值
if(ForPos=0)then //如果没有^号
ForPos:=200;//将ForPos设置成一个不可能的值
if(FirstPos>SubPos)then FirstPos:=SubPos;if(FirstPos>PluPos)then FirstPos:=PluPos;if(FirstPos>MulPos)then FirstPos:=MulPos;if(FirstPos>DivPos)then FirstPos:=DivPos;if(FirstPos>ForPos)then FirstPos:=ForPos;
AnyFirstPos:=FirstPos;//结束函数，返回位置
end;第3章 “速算24”扑克游戏--单元、异常、逻辑
3.5 数学逻辑单元(2)
3.得到最先出现的运算符类型
这个函数的返回结果是Char类型，代表这是一个字符变量。实际上，它返回的是+、-、*、/ 这4个符号中最早出现的一个。
程序分别寻找4个符号最早出现的位置，然后判断最先出现的是哪一种符号，再根据符号类型返回代表运算符的字符。
在具体的实现过程中，因为我们要得到最先出现的运算符，所以判断的是每次寻找后各个运算符的位置的最小值。如果不存在这个运算符，则将代表这个运算符位置的相应变量设置为200。对于本程序来说，这是一个搜索过程中不可能达到的值，这样就排除了这个位置的继续比较的可能。
程序代码如下所示：
function AnyFirstF(Str:String):Char;var SubPos:integer;PluPos:integer;MulPos:integer;DivPos:integer;Operator:char;tempPos:integer;begin SubPos:=Pos('-',Str);PluPos:=Pos('+',Str);MulPos:=Pos('*',Str);DivPos:=Pos('/',Str);
if(SubPos=0)then //如果没有-号
SubPos:=200;//将SubPos设置成一个不可能的值
if(PluPos=0)then //如果没有+号
PluPos:=200;//将PluPos设置成一个不可能的值
if(MulPos=0)then //如果没有*号
MulPos:=200;//将MulPos设置成一个不可能的值
if(DivPos=0)then //如果没有/号
DivPos:=200;//将DivPos设置成一个不可能的值
Operator:='-';tempPos:=SubPos;if(tempPos>PluPos)then begin tempPos:=PluPos;Operator:='+';end;if(tempPos>MulPos)then begin tempPos:=MulPos;Operator:='*';end;if(tempPos>DivPos)then begin tempPos:=DivPos;Operator:='/';end;
AnyFirstF:=Operator;//结束函数，返回位置 end;4.计算不带括号的运算表达式
做完上述工作后，我们可以开始进行一些实际的运算了。
包括加、减、乘、除、乘方运算的表达式的程序算法如下所示：
（1）寻找乘方符号“^”，如果存在，则计算一次乘方，去掉计算过的部分，接着循环查找和计算子串的乘方。
（2）寻找乘号“*”或者除号“/”，如果存在，则计算一次乘（除）法，去掉计算过的部分，接着循环计算子串的乘除法。
（3）寻找加号“+”或者减号“-”，如果存在，则计算一次加（减）法，去掉计算过的部分，接着循环计算子串的加减法。
上述算法是严格按照顺序进行的，它体现了数学运算中的优先关系，经过上述的计算，子字符串被分解，计算完毕。
无论是乘方、乘除法还是加减法，内部实现的逻辑是基本一致的。下面，我们设定有一个运算表达式：3+2^5/4。
程序代码如下所示：
function SubCompute(Str:String):integer;var Middle:String;Mul2:String;Right:String;First:integer;tempStr:String;temp:integer;Left:String;Mul1:String;MulPos:Integer;DivPos:Integer;Fuhao:Char;begin Middle:='';Mul2:='';Right:='';
//定位第一个^号位置，计算乘方
First:=Pos('^',Str);While(First<>0)do //循环计算乘方
begin tempStr:=Copy(Str,1,First-1);temp:=AnyLastPos(tempStr);Left:=Copy(Str,1,temp);Mul1:=Copy(str,temp+1,First-temp-1);tempStr:=Copy(str,First+1,Length(str)-First);temp:=AnyFirstPos(tempStr);if(temp=200)then begin Mul2:=tempStr;Right:='';end else begin Mul2 :=Copy(tempStr,1,temp-1);Right:=Copy(tempStr,temp,Length(tempStr)-temp+1);end;Middle:=FloatToStr(IntPower(StrToInt(Mul1),StrToInt(Mul2)));Str:=Left+Middle+Right;First:=Pos('^',Str);end;
//定位第一个*号或/号的位置
MulPos:=Pos('*',Str);DivPos:=Pos('/',Str);First:=MulPos;if(MulPos>DivPos)then First:=DivPos;if((DivPos=0)and(MulPos<>0))then begin First:=MulPos;DivPos:=2000;// 将除号所在位置设置成一个大于MulPos但又不可能的值
end;if((DivPos<>0)and(MulPos=0))then begin First:=DivPos;MulPos:=2000;// 将乘号所在位置设置成一个大于DivPos但不可能的值
end;while(First<>0)do //循环计算乘、除
begin tempStr:=Copy(Str,1,First-1);temp:=AnyLastPos(tempStr);Left:=Copy(Str,1,temp);Mul1:=Copy(Str,temp+1,First-temp-1);tempStr:=Copy(Str,First+1,Length(Str)-First);temp:=AnyFirstPos(tempStr);if(temp=200)then begin Mul2:=tempStr;Right:='';end else begin Mul2 :=Copy(tempstr,1,temp-1);Right:=Copy(tempStr,temp,Length(tempStr)-temp+1);end;if(MulPos>DivPos)then Middle:=IntToStr(StrToInt(Mul1)div StrToInt(Mul2))else Middle:=IntToStr(StrToInt(Mul1)*StrToInt(Mul2));Str:=Left+Middle+Right;
MulPos:=Pos('*',Str);DivPos:=Pos('/',Str);First:=MulPos;if(MulPos>DivPos)then First:=DivPos;
if((DivPos=0)and(MulPos<>0))then begin First:=MulPos;DivPos:=2000;// 将除号所在位置设置成一个大于MulPos但又不可能的值
end;if((DivPos<>0)and(MulPos=0))then begin First:=DivPos;MulPos:=2000;// 将乘号所在位置设置成一个大于DivPos但不可能的值
end;end;//定位+、-号首先出现的位置
First:=AnyFirstPos(Str);if(First=200)then //如果没有+、-号，则可以直接返回结果
begin SubCompute:=StrToInt(Str);exit;end;Fuhao:=AnyFirstF(Str);//确定首先出现的符号是+号还是-号
while(First<>0)do begin //如果找到+号或-号
tempStr:=Copy(Str,1,First-1);temp:=AnyLastPos(tempStr);Left:=Copy(Str,1,temp);Mul1:=Copy(Str,temp+1,First-temp-1);tempStr:=Copy(Str,First+1,Length(Str)-First);temp:=AnyFirstPos(tempStr);if(temp=200)then begin Mul2:=tempStr;Right:='';end else begin Mul2 :=Copy(tempStr,1,temp-1);Right :=Copy(tempStr,temp,Length(tempStr)-temp+1);end;if(Fuhao='+')then Middle:=IntToStr(StrToInt(Mul1)+StrToInt(Mul2))else Middle:=IntToStr(StrToInt(Mul1)-StrToInt(Mul2));Str:=Left+Middle+Right;First:=AnyFirstPos(Str);if(First=200)then break;Fuhao:=AnyFirstF(Str);end;
SubCompute:=StrToInt(Middle);end;程序执行过程如下所示：
（1）定位字符串中第一个乘方符号“^”的位置First。这个式子中的First为4。
（2）如果存在乘方符号，即First不等于0，则继续进行计算，否则退出循环。
（3）进入循环体内部，得到“^”前面的子串tempStr（“3+2”），寻找tempStr中的最后一个运算符temp（这里是“+”），则Temp和First之间的字符就是乘方符号的第一个参数（“2”）。
（4）同样的逻辑，得到“^”后面的子串tempStr（“5/4”），寻找tempStr中的第一个运算符位置temp（“/”），则Temp和First之间的字符就是乘方符号的第二个参数（“5”）。
（5）去掉乘方符号和两个参数，得到左侧子串left（“3+”）和右侧子串right（“/4”）。
（6）利用这两个参数和乘方符号，计算乘方，将结果返回，并插入在left和right之间，得到一次计算后的新字符串（“3+32/4”）。
（7）判断新串内部是否包含“^”，如果包含，则返回到步骤（3），不包含则进入下一种运算。
第3章 “速算24”扑克游戏--单元、异常、逻辑
3.5 数学逻辑单元(3)5.计算整个表达式的值
TotalCompute函数利用循环，找到最内层的一对括号，然后调用SubCompute函数处理这一对括号中的表达式。SubCompute函数处理的表达式中已经没有括号了，因此SubCompute只需处理乘方、加、减、乘、除，返回结果，形成新的字符串。
当整个字符串缩减至空值时，整个表达式计算完成。
程序代码如下所示：
function TotalCompute(Str:String):integer;var First:integer;Last:integer;SubStr:String;LeftStr:String;Middle:String;Right:String;temp:integer;begin First:=LastDelimiter('(',Str);//定位最后一个(号位置 while(First<>0)do begin SubStr:=Copy(Str,First+1,Length(Str)-First);Last:= Pos(')',Str);//Last:=Last+First;//定位最后一个(号以后的最开始的)号位置
LeftStr:=Copy(Str,1,First-1);//(号左边的字符串
Middle:=Copy(Str,First+1,Last-First-1);//()号中间的字符串
Right:=Copy(Str,Last+1,Length(Str)-Last);//)号右边的字符串
temp:=SubCompute(Middle);//进入下面的计算
Middle:=IntToStr(temp);
Str:=LeftStr+Middle+Right;First:=LastDelimiter('(',Str);end;
Result:=SubCompute(Str);end;end.在程序中，“计算”按钮的OnClick事件处理程序中调用TotalCompute函数。函数中使用了一些数学函数和定位字符串的函数，这些函数Delphi已经在相应的系统单元中进行了定义，我们需要把这些系统单元包括到文件里面：
uses Sysutils,Math;将前面调用TotalCompute的注释去掉，把代码改回：
procedure TForm1.Button2Click(Sender: TObject);var result:integer;answer:String;begin result:=TotalCompute(Edit1.Text);if(result=24)then Application.MessageBox('您真行，我服了您!','对了',MB_OK)else begin
第三篇：c++24点游戏
c++24点游戏
#include “iostream” #include “string” using namespace std;
//定义Stack类
const maxsize=20;
enum Error_code { success, overflow, underflow };
template
bool empty()const;bool full()const;int size()const;void clear();
Error_code top(T &item)const;Error_code pop();
Error_code push(const T &item);private: int count;T entry[maxsize];};
template
template
bool Stack
template
bool Stack
template
template
template
Error_code Stack
template
Error_code Stack
template
Error_code Stack
Stack
int set;
// 判断程序中的异常，以便适时退出？//
void process(char c)
//计算两个数的 +-* / 运算// { int k=0;double a,b;sign.pop();
if(num.top(b)==success){
num.pop();
if(num.top(a)==success){ num.pop();k=1;} } if(k){ switch(c){
case '+': num.push(a+b);break;case '-': num.push(a-b);break;case '*': num.push(a*b);break;case '/': if(b==0){ set=4;num.push(-1);} else
num.push(a/b);break;} }
else {set=1;num.push(-1);} }
void get_command(string &str){
cout<<“n请输入要进行运算的表达式,包括” +,-,*,/,=,(,)“和数字,”< <<“注意: 以数字开头,等号结尾,中间括号要匹配.”< double do_command(const string &str){ string s=“"; double outcome=-1;char c; for(int i=0;str[i]!=' ';i++){ if(set!=0)break;//例外 则停止运行 while(1){ //分离数据与运算符 if(str[i]<='9' && str[i]>='0' || str[i]=='.'){ s+=str[i];i++;} else { if(s!=”“){ if(num.push(atof(s.c_str()))==overflow)set=3;s=”“;} break;} } char ch= str[i]; switch(ch){ //处理运算的优先级，并注意例外抛出 case '*': case '/': if(sign.top(c)==success)if(c=='*'||c=='/')process(c);if(sign.push(ch)==overflow)set=3;break;case '+': case '-': while(sign.top(c)==success){ if(c!='(')process(c);else break;} if(sign.push(ch)==overflow)set=3;break;case '(': if(sign.push(ch)==overflow)set=3;break;case ')': while(sign.top(c)==success){ if(c!='(')process(c);else break;} sign.pop();break;case '=': while(sign.top(c)==success){ if(c!='(')process(c);else break;} break; default: set=2;break;} } if(num.size()==1 && sign.size()==0)num.top(outcome);else set=1; if(set==0)cout<<”运算结果是：n“< if(set==1)cout<<”n您输入的不匹配，有错误发生。Result lost！“< if(set==4)cout<<”n 分母为0，不能进行除法运算，出现溢出，Lost result！“< return outcome;} void main()int f(){ double out;do { string str,s;set=0; get_command(str);s=str; if(str[0]=='-')str='0'+str;//处理表达式中的负号 for(int i=1;str[i]!=' ';i++){ if(str[i]=='-' && str[i-1]=='('){ str.insert(i,”0“);i++;} } out= do_command(str); cout< 我gai过此行 cout<<”如果你算的结果不等于24，需要重新计算请输入你算出的结果，程序有漏洞，请合作。“< return out;} int main(void) { int ii,zz,jj; printf(”0-12的4个数字nn“); for(jj=0;jj<2;) { for(ii=0;ii<4;ii++) { zz=rand()()% 12; cout< } cout<<”请用这4个数字算出24“< f(); cout<<”是否继续；是1否2"< cin>>jj; cout< } （一）“挑战杯”题目 1.“挑战杯”的全称是什么？ “挑战杯”全国大学生系列科技学术竞赛(高级题)2.“挑战杯”竞赛宗旨？ 崇尚科学、追求真知、勤奋学习、锐意进取、迎接挑战(高级题)3.“挑战杯”竞赛又被成为什么？ 中国大学生学生科技创新创业的“奥林匹克”盛会(高级题)4.“挑战杯”比赛的小组人数限制范围？ 小挑10人，大挑8人(高级题)5.“挑战杯”作品大概需要多少字？ 论文8000以内 调查报告15000以内(高级题)6.“挑战杯”是个什么性质的比赛？ 导向性、示范性、群众性(高级题)7.“挑战杯”比赛书面企划有哪几个基本模块？(高级题)8.“挑战杯”这个比赛是什么时候设立的？ 1989年(高级题)9.“挑战杯”比赛分为大挑和小挑，它们的全称分别是什么？ 大挑：“挑战杯”全国大学生课外学术科技作品竞赛 小挑：“挑战杯”中国大学生创业计划竞赛(高级题)10.“挑战杯”竞赛是由哪个学校最先提出开展的？ 清华大学(高级题)11.“挑战杯”竞赛涉及社会中哪些因素？（任意说三点）(高级题)12.“大挑”和“小挑”是怎样分时间段举办的？ 交叉轮流开展，每个项目每两年举办一届(高级题)13.哪位国家领导人曾为“挑战杯”提过字？ 江泽明(高级题)14.去年“大挑”国赛在哪个大学举办？ 苏州大学(高级题)15.去年是第几届“大挑”国赛？ 十三届(中级题)16.明年举办的是“大挑”国赛还是“小挑”国赛？ “大挑”(中级题)17.今年是第几届“小挑”国赛？ 第九届(中级题)18.去年我校有几支队伍参加了“大挑”国赛？ 两支(中级题)19.去年我校参加“大挑”的两只队伍分别来自什么学院？(高级题)20.去年我校获“大挑”国赛一等奖的作品是关于哪方面的？ 养老院(高级题)21.今年我校有几支队伍参加了“小挑”国赛？ 一支(中级题)22.今年我校参加“小挑”国赛的队伍获得了怎样的成绩？ 国赛铜奖 23.今年我校的“小挑”国赛作品是关于什么的？ 公益创业赛(高级题)24.“挑战杯”俱乐部的主办单位是什么？ 校科协挑战杯部(中级题)25.我校主要开展的是“大挑”还是“小挑”？(中级题)26.去年的“大挑”国赛中我校两支参赛团队分别获得了几等奖的佳绩？ 一等奖 三等奖(高级题)27.说出三个校科协曾举办过的有关“挑战杯”的活动 国赛践行，“挑战杯”俱乐部招新，经验交流会。(高级题)28.和“挑战杯”一起并称为全国三大大学生赛事的另外两个赛事是什么？ 数模，机器人大赛(高级题)29.说出我校两个以上在“挑战杯”国赛中获奖的作品名。(高级题)30.说出前年“小挑”国赛获奖团队名 不可慢队(高级题)31.去年“大挑”国赛一等奖奖金是多少？(高级题)32.我校参加“挑战杯”的形式(高级题)33.说出两个以上我校在做“挑战杯”方面比较有经验的老师(高级题)34.去年在苏州大学结束的“挑战杯”国赛是大挑还是小挑？ 大挑 35.这个学期校科协在学校哪个地方举办了“挑战杯”作品展？ 图书馆 36.一支“挑战杯”团队一般需要几个指导老师？(高级题)37.我校“挑战杯”是哪一年开始的？(高级题)38.前年我校队伍“不可慢”在“小挑”国赛中获得了什么奖？ 国赛银奖(中级题)39.第二届“挑战杯”是在哪个高校举办的？ 浙江大学(高级题)40.说出曾经举办过“小挑”国赛的城市（至少两个）(高级题)41.“小挑”的发源国家是？ 美国(高级题)42.我校“挑战杯”俱乐部是由哪一年创办的？ 2013年(高级题)43.我校科协成立于几几年？ 1994(中级题)44.我校科协的吉祥物是什么？ 蓝猫(中级题)45.我校科的办公室在大活哪里？ 大活209(中级题)46.我校科协的会徽是以哪三种颜色为主的？ 黄黑白(中级题)47.说出校科协的两个特色活动部门 挑战杯部 学术交流部(中级题)48.我校科协一共有几个部门？ 10(中级题)49.我校科协的全称是什么？ 南京财经大学科学技术协会(中级题)50.这届我校科协的正主席来自哪个院？ 金融(中级题)51.我校科协分几个中心？ 四个(中级题)52.这是我校科协第几届科技文化节？(中级题)53.说出校科协的一个活动(低级题)54.说出校科协的两个活动(低级题)55.说出校科协的三个活动(中级题)56.说出校科协的四个活动(中级题)57.说出校科协的五个活动(高级题)58.南财前身是什么学校 南京粮食学校(低级题)59.南财的全称是什么 南京财经大学(低级题)60.南财成立于几几年（1956） 61.曾就读于我校的香港金鹰国际商贸集团公司执行董事，首席财务官，副总裁叫什么（韩相礼）(高级题)62.曾就读于我校现任南京审计学院国际审计学院副院长，兼审计系主任的叫什么（齐兴利）(高级题)63.我校一共有多少个学院？(低级题)64.说出我校十个学院的名字(低级题)65.我校最大的院系是什么 会院(低级题)66.我校周围三个兄弟学校分别是什么(低级题)67.今年是我校成立第几周年(低级题)68.校科协的口号：爱（挑战）、爱学术、这里是南财校科协。(中级题)69．挑战杯比赛主要分为校赛、（国赛）和省赛。(中级题)70.“挑战杯”竞赛的两个比赛是否每一年都同时举办？（否）(中级题)71.参赛作品需要高级专业技术职称的指导老师吗？若需要，需要几名？（需要，2名）(高级题)72.大挑国赛最多可以报___人，而小挑最多可以报___人（8 10）(高级题)73．小挑奖项设置为___奖、___奖、___奖，而大挑设置___等奖、___等奖、___等奖、___等奖。（金 银 铜 特 一 二 三）(高级题)74.今年是___国赛，___报名。（大挑 小挑）(高级题)75.大挑发起高校可报________作品 六件(高级题) （二）科普知识类题目 1、康熙皇帝的庙号是：(高级题)A: 圣祖 2、<<西游记>>中的火焰山是今天的：(低级题)A: 吐鲁番盆地 3、吴敬梓是哪本名著的作者？(低级题)《儒林外史》 4、评剧起源于：(中级题)北京农村流行的“对口莲花落” 5、菜汤上浮着一层油会使菜汤凉得：(中级题)更慢 6、海洋中最多的生物是？(低级题)2: 浮游生物 7、不会游泳的人在死海里：(低级题)2: 会浮在水面上 8、电子计算机发明于哪一年？(中级题)1: 1946年 9、用自动台呼叫别人的数字传呼的时候,能否将你身处宾馆的总机号和分机号同时打上?(低级题)2: 能 10、中国农业银行发行的信用卡是：(高级题)1: 金穗卡 11、大兴安岭嘎仙洞石室，是古代哪个民族的发源地？(低级题)2: 鲜卑 12、电影《刘三姐》是反映-什么民族的生活故事？(高级题)4: 壮族 13、欧洲最大的半岛在：(低级题)2: 北欧 14、宋代的代表性刑罚是：(低级题)1: 刺配 15、袈裟为什么也叫百纳衣？(低级题)1: 由许多块布补缀而成 16、“山外青山楼外楼”在原诗《题临安邸》中的下句是：(中级题)2: 西湖歌舞几时休 17、薄公英靠什么传播种子？(中级题)3: 风力 18、杜鹃鸟不做窝，她把蛋下到其他鸟的鸟巢里对吗？(低级题)1: 对 19、现在的世界杯足球赛的冠军奖杯定名为什么：(低级题)3: 国际足联世界杯 20、我国第一座地热发电站是：(低级题)2: 羊八井 21,被称作”法国号“的乐器是:(高级题)A: 圆号 22,一公斤铁和一公斤棉花哪一个轻(低级题)A: 一样重 23,乌拉尔山是跨大洲的山脉吗(低级题)2: 是 24,称”榨菜“为”榨“是否因腌制过程中榨去水分是一道重要工序(低级题)1: 是 25,下面哪种真正是”鱼“(高级题)3: 乌鱼 26,汇入大西洋最长的河流是亚马逊河吗(低级题)2: 是 27,发生”日食“是由于:(低级题)1: 月亮挡在地球与太阳之间 28,黄酒名品”加饭酒“的产地在哪(高级题)1: 浙江 29,下面四种珍珠哪一种最珍贵(中级题)B: 天然海水珠 30,我国宋代邢窑出白釉瓷,越窑出青釉瓷,所以有:(高级题)1)”南青北白“之称 31,普利策奖是什么方面的大奖(低级题)新闻,文化 32,许多人都喜欢到低于海平面410公尺的死海去做日光浴是因为:(低级题)紫外线最弱 33,我国公安机关的性质是:(低级题)行政机关 34,成都的市花是:(低级题)2)芙蓉花 35,维纳斯是罗马神话中的:(低级题)2: 爱神与美神 36,电脑的中央处理器英文简写是什么(中级题)3: CPU 37,大汶口文化遗址在我国的:(低级题)2: 山东 38,冰糖是用白砂糖做的,对不对(低级题)2: 对 39,世界最重要的IT高科技产业基地硅谷位于美国的哪个州(高级题)3: 加利弗尼亚州 40,眉毛的生长周期有多久(中级题)3: 二个月 41,快攻型乒乓球运动员一般都选用什么胶皮结合海绵的球拍(低级题)正贴 42,下列影片中,以歌颂少数民族新生活为题材的是:(高级题)《达吉和她的父亲》 43,人体消化道中最长的器官是:(中级题)1: 小肠 44,哈雷慧星的最早记录是哪国人留下的(高级题)4: 中国人 45,我国最早的中医学专著是什么(低级题)《黄帝内经》 46,”泾渭分明“指的是:(低级题)1: 泾水清,渭水浊 47,涮羊肉起源于(低级题)2: 元朝 48,钢是由什么组成的(高级题)1: 铁,碳 49,目前人类已知的最软的石头是:(高级题)3: 滑石 50,《全唐诗》收录的是唐代:(低级题)2: 4万8千多首诗 51, ”芭蕾舞“是从哪国传进的外来语(高级题)2)法国 52,迫击炮的弹道是否弯曲(低级题)B: 是 53,四大名茶之一的龙井茶产地是:(低级题)1: 浙江杭州 54,近视是较远物体的平行光线成像于视网膜的前还是后(低级题)2: 前面 55,我国四大名砚之冠--端砚产自哪里(中级题)广东 56,《清明上河图》是一幅:(低级题)2)社会风俗画 57,摄影中用得最多的是:(低级题)2: 可见光 58,大汶口文化遗址在我国的:(低级题)2: 山东 59,”建元“是我国哪一个皇帝使用的年号(高级题)2: 汉武帝 60,古语说”良贾不为折阅不市“说的是:(低级题)C: 商人不因折本不买卖 61,人体中最先衰老的器官是:(高级题)D: 胸腺 62,最耐日晒的织品是哪一种(低级题)A: 腈纶 63,欧元什么时候正式诞生(中级题)2)1999年1月1日 64,”心比天高,身为下贱“是《红楼梦》中对谁的判词(高级题)1)睛雯 65,”冬天到了,春天还会远吗“语出:(高级题)4)雪莱 66,下面干果中脂肪含量最高的是:(高级题)5: 核桃仁 67,除夏威夷之外,哪个州也是美国本土以外的州(高级题)3: 阿拉斯加州 68,以下哪些果实是核果(中级题)2)樱桃 69,生铁又硬又脆是因为它含碳:(低级题)多 70,美国心理学家,行为学家马斯洛认为人的最高级需要是什么(低级题)1)自我实现需要 71,玛瑙上的一圈圈花纹形成于:(低级题)1)不同时期 72,”圆舞曲之王“约翰.施特劳斯与”圆舞曲之父“老约翰.施特劳斯是什么关系(高级题)5)父子 73,每一个少数民族都有自己喜爱的颜色,生长在大草原的蒙古族喜爱:(中级题)2: 白色 74,舞蛇者表演时,蛇随舞蛇者舞动是因为:(低级题)A: 舞蛇者动作的影响 75,骨折时伴随休克发生,应先治:(低级题)A: 休克 76,为了便于让望远镜观测天体,天文台的房子屋顶被设计成:(中级题)1: 圆顶 77,传说中的斑竹是怎样形成的(低级题)舜的妃子的眼泪染成 78,《史记》中的”世家“是给什么人作的传(高级题)诸侯王 79,乌拉尔山是跨大洲的山脉吗(低级题)是 80,白炽灯用久了会发黑是因为:(高级题)钨丝升华 81,花茶的种类是根据什么命名的(低级题)加入的鲜花 82,国际马拉松跑的赛程是:(低级题)42,195米 83,一般而言,山羊皮革和绵羊皮革哪个好(低级题)2: 山羊皮革 84,血液温度低的动物就是冷血动物.(低级题)1: 不对 85,为什么说”运动不宜饮酒“(中级题)2: 饮酒会降低运动员的运动能力 86,”三过家门而不人“是哪一历史人物的故事(高级题)1: 禹 87,胰岛素是一种:(中级题)2: 蛋白质 88,八佰拜WAP网站将提供什么服务功能(低级题)1: 价位提醒 89,”七月流火“指天气:(低级题)转凉 90,最早的血压计用于测量谁的血压(高级题)马 91,《本草纲目》的作者是(低级题)李时珍 92,美国历史上第一所高等学府是:(高级题)哈佛大学 93,”桂林山水甲天下“,什么山水”甲桂林“(低级题)1)阳朔 94,西印度群岛位于:(中级题)4)大西洋西部 95,”萃取“是利用各种物质的什么特性来分离混合物(低级题)2)对某溶剂的溶解度不同 96,世界上第一个国家颁布的药典出现在:(中级题)2: 中国唐朝 97,”印象派“一词源于:(中级题)A: 莫奈《日出 印象》 98,最早的校园歌曲出现在:(高级题)A: 日本 99,味精的主要成分是什么(中级题)1: 谷氨酸钠 100,真丝衣服能不能与樟脑丸放在一起(低级题)2: 不能 101,法国作家儒勒 凡尔纳被称为:(低级题)2: 科幻小说之父 102,看见闪电后3秒钟听到雷声,表明闪电离你有:(低级题)3: 1公里左右 103,”昙花一现“是”现“在:(低级题)1: 晚上 104,学习绘画时,由浅入深,循序渐进的学习次序应是:(低级题)2: 静物,风景,人物 105,”欧 亨利式的结尾“是指美国作家欧 亨利的短篇小说结局:(低级题)2: 出乎意料,耐人寻味 106,引起人体休克的原因很多,但都具有一个共同点,就是:(低级题)2: 有效循环血量减少 107,《奥赛罗》出自谁手(高级题)4: 莎士比亚 108,较早使用的活字是:(高级题)2: 陶活字 109,金庸的籍贯是:(中级题)2: 浙江海宁 110,蕨类植物比苔藓类植物进化的根据是:(低级题)2)有维管组织 111,企鹅一般在几月份产卵(高级题)5月 112,户枢不蠹”的“不蠹”是什么意思(低级题)1: 不生虫 113,月亮老是一面朝着地球的原因是:(中级题)2: 月亮自转与公转的周期相同 114,被称为菊月的月份是:(低级题)2: 九月 115,“沙龙”源于哪国语言(中级题)2: 法国 116,地球的年龄约有:(中级题)46亿年 117,玉米受潮后产生的致癌物质是:(低级题)2: 黄曲霉毒素 118,中岳嵩山分为太室山和少室山.少林寺在:(低级题)1: 少室山 119,《三国演义》中的“凤雏”是谁(中级题)1: 庞统 120,WNBA代表什么(中级题)美国女子职业篮球赛 121,乌鱼蛋是什么(高级题)雌墨鱼卵巢干制品 122,行星距离太阳近的时候运转速度快,对吗(低级题)对 123,近来被人们津津乐道的一种以长度单位为名称的技术叫做:(低级题)纳米技术 124,在亚洲反法西斯战争中,盟军中牺牲的最高级别将领是:(高级题)2)张自忠(注:时任国民党军上将集团军司令)125,哈雷彗星绕太阳运行的周期约为:(低级题)B: 76年 126,交通银行属于什么性质(低级题)A: 股份制银行 127,坏血病是因缺什么而造成的(低级题)B: 维生素C 128,汗字“廿”表示:(低级题)A: 二十 129,辽宁曾被称为:(中级题)A: 奉天 130,黄山分为前海,天海,北海,东海,西海等五大景区,所谓的“海”指的是什么(低级题)C: 云海 131,黄金与其它金属混合可以制成五颜六色的色金首饰,当黄金与铜按比例混合,能制成:(低级题)3: 红色金 132,下列天体中,距离地球最近的恒星是:(低级题)3: 太阳 133,如果名义利率低于通货膨胀率时,储蓄是否划算(低级题)不划算 134,六弦琴是什么乐器的别称:(低级题)吉他 135,古代著名的水利工程都江堰是谁设计的(高级题)2)李冰父子 136,沟通太平洋和印度洋的水道是:(低级题)3: 马六甲海峡 137,七大洲中面积最小的是:(高级题)2: 南极洲 138,围棋的产生与什么有关(低级题)3: 与古代战争有关 139,人参的主要产地在:(低级题)1: 东北 140,哪一类茶属于发酵茶(低级题)2: 红茶 141,云南的“普洱茶”缘于什麽(低级题)B: 地名 142,《奥德赛》的主人公是:(低级题)A: 俄底修斯 143,铁锅通常用哪种铁制成(低级题)1)生铁 144,在狗的眼睛里世界是什么颜色的(低级题)2)只有黑白灰色 145,下列地点与电影奖搭配不正确的是:(低级题)A: 柏林-圣马克金狮 146,请问在相等分量下,下面哪种食物胆固醇含量最低(高级题)4: 兔肉 147,一般认为篮球起源于:(中级题)2: 美国 148,樱桃白兰地是用樱桃作原料酿制的,对不对(低级题)2: 对 149,世界上最大的冰川在哪个洲(高级题)A: 南极洲 150,商品的性价比越高,其市场竞争力越:(低级题)B: 强 151,世界第一枚邮票出现在:(低级题)3: 英国 152,在什么条件下柿子才可以结冰(低级题)3: 低于零摄氏度 153,“蜃楼疑海上,鸟道没云中”赞美的是:(中级题)1: 悬空寺 154,海南岛是我国的第几大岛(中级题)2: 第二大岛 155,人们最初发明滑冰,是把它作为:(低级题)3: 交通工具 156,“自由女神像”是哪个国家送给美国的礼物(高级题)2: 法国 157,“双喜临门”是我国哪个省市的名字(低级题)重庆 158,阿尔卑斯山脉的最高峰是:(高级题)2)勃朗峰 159,有“植物熊猫”之称的是(低级题)银杉 160,古筝和古琴哪一个的弦更多(低级题)古琴 161,蒲松龄的故居在:(高级题)C: 山东淄博 162,小说《包法利夫人》的作者是:(中级题)A: 福楼拜 163,中国共产党的创始人李大钊是被什么人杀害的(低级题)1: 军阀 164,有记录的世界上飞翔距离最远的是什么鸟(低级题)2: 北极燕鸥 165,一个杯子里装有水,水上有一块冰,此时水已满杯,当冰溶后:(低级题)水会溢出杯子 166,蔬菜,水果,鸡蛋等商品在不同的时间里价格不同,这差别叫做什么差价(低级题)季节差价 167,新中国第一部临时宪法的简称是:(高级题)1)共同纲领 168,牛奶是否会增加血液内胆固醇含量(低级题)A: 不会 169,鹿茸是新生的:(低级题)B: 鹿角 170,安徒生的童话《海的女儿》中的“美人鱼”现座落在:(低级题)1: 丹麦首都哥本哈根 171,患糖尿病是因为胰岛素:(低级题)2: 太少 172,玻璃幕墙的光反射能否造成光污染(低级题)A: 能 173,为什么会发生月食(中级题)3)月亮转到了地球阴影里 174,阿斯匹林是常用药,它的主要功能是:(中级题)1: 解热止痛 175,《窦娥冤》的作者是:(低级题)1: 关汉卿 176,日光灯是一种高压水银灯吗(低级题)2: 不是 177,科西嘉人属于:(低级题)1)西欧民族 178,恐龙属于:(低级题)1)爬行动物 179,下半旗是把旗子下降到:(高级题)4)距离杆顶的1/3处 180,举世闻名的泰姬陵在:(低级题)2)印度 181,古书中男子手里常握有“三尺”,请问它指什么(高级题)A: 剑 182,我国最早的佛寺是:(低级题)A: 洛阳白马寺 183,大气中起吸收紫外线,保护地球生命作用的是哪种成分(中级题)D: 臭氧 184,用齿轮传动不能改变运动的方向,对吗(低级题)不对 185,“世界三大男高音”中的多明戈和卡雷拉斯都是(中级题)西班牙人 186,作家老舍的原名叫什么(低级题)舒庆春 187,人民英雄纪念碑上的雕塑作品《五四运动》是:(低级题)浮雕 188,京剧《群英会》中“周瑜”的行当是(高级题)1: 小生 189,“安哥拉兔”由何得名(低级题)3: 原产地 190,徐悲鸿以画什么闻名世界(低级题)2)奔马 191,茶叶的含水量高于8%会导致什么后果(低级题)2)发生霉变 192,目前在世界范围内仍使用的历法又叫:(低级题)1)格里高利历 193,依照西方习俗, 订婚戒指戴在左手哪根手指上(高级题)B: 无名指 194,“芫爆”这种烹饪方法以什么而得名(低级题)B: 以香菜为配料 195,人体中胃的上口称为:(高级题)B: 贲门 196,WTO是哪个组织的称呼(中级题)世界贸易组织 197,《掀起你的盖头来》是哪个民族的民歌(中级题)1: 维吾尔族 198,人体最大的器官是:(高级题)1)皮肤 199,口的形状反映了鱼的摄食习惯,喜欢吃水面食物的鱼的口形应该:(低级题)2)向上翘 200,“问君能有几多愁”诗句的下句是:(低级题)C: 恰似一江春水向东流 201,我国生长的孔雀种类是:(低级题)1: 绿孔雀 202,地球上出现的潮汐是由于:(低级题)地月吸引力 203,我们看到的月光是:(中级题)月亮反射太阳光 204,“名不正则言不顺”是哪家的思想(低级题)1)儒家 205,罗大佑的作品有(高级题)3)《恋曲1990》 206,古人常用松鹤延年图祝寿,鹤是生长在:(低级题)沼泽地 207,古代游牧民族生活存在太阳崇拜吗(低级题)B: 存在 208,《四世同堂》主题区《重整河山待后生》属于哪一种曲艺形式(高级题)鼓词 209,月亮金字塔坐落在哪里(高级题)墨西哥 210,“江苏”这个地名,取义于哪两个名称的连称(低级题)2: 南京-苏州 211,“孤帆远影碧空尽”的下一句是什么(高级题)1: 惟见长江天际流 212,“大珠小珠落玉盘”所形容的是什么乐器的弹奏声(高级题)1: 琵琶 213,法国的国庆日是:(低级题)2)7.14 214,“塔”属于什么建筑(高级题)1)佛教建筑 215,以下哪里是大熊猫的产地(低级题)1: 甘肃 216,吃太多手摇爆米花机爆出的米花会导致:(低级题)1: 铅中毒 217,9,10月,大马哈鱼逆流游到黑龙江是为了(低级题)1: 产卵 218,中国和朝鲜两国的界河是(低级题)B: 鸭绿江 219,吴道子的作品是:(中级题)3: 天王送子图 220,被称为“诗圣”的唐代诗人为:(高级题)3: 杜甫 221,“宪法”一词最早来源于:(低级题)2: 拉丁文 222,有“无烟城市”之称的是:(低级题)B: 雷克雅末克 223,满洲里在我国的:(低级题)1: 东北 224,“山外青山楼外楼”在原诗《题临安邸》中的下句是:(中级题)2: 西湖歌舞几时休 225,飞鱼跃出水面后可在空中飞行,下面哪一种是飞鱼的飞行动作(低级题)3: 两翅不动,滑翔 226,声音在下列介质中,传播的更快的是:(低级题)1: 水中 227,中国最大的商业银行是:(高级题)1: 中国工商银行 228,“海的女儿”是哪个城市的城徽(高级题)3: 哥本哈根 229,全国性抗日战争爆发的标志是(中级题)3: 七七事件 230,不等腰直角三角形中对着直角的边叫做:(低级题)2: 弦 231,《第九交响曲》(即《合唱交响曲》)的作者是:(高级题)2: 贝多芬 232,下列那种文字出现在人民币上(中级题)B: 蒙文 233,自元朝以后,年代愈近建筑斗拱愈:(高级题)B: 细而密 234,其他条件相同,下列哪种茶壶装水更多(低级题)壶嘴与壶身等高 235,中国最热的地方在哪里(低级题)1)吐鲁番盆地 236,以下节气中哪几个反映了自然界生物的物候现象(高级题)D: 惊蛰 237,七大洲中面积第二的是:(高级题)3)非洲 238,斯芬克斯之谜中的“斯芬克斯”是指:(低级题)2)希腊神话中的女妖 239,黄褐斑和雀斑都多见于:(低级题)1)女性 240,“司空见惯”是说司空见惯了:(中级题)3: 美女 241,《嘎达梅林》是哪个民族的叙事歌曲(高级题)4: 蒙古族 242,否决权最初的语义是:(低级题)3: 我禁止 243,下列半岛哪个以出产石油著称(高级题)阿拉伯半岛 244,我国的第一部诗歌总集是:(低级题)诗经 245,在我国内地驾驶车辆,必须遵守:(中级题)A: 右侧通行的原则 246,围棋棋盘共有几个交叉点(低级题)C: 361 247,人体最大的细胞是:(低级题)1: 卵细胞 248,被称为我国最最大的古典艺术宝库的石窟是哪一个(中级题)甘肃敦煌莫高窟 249,下面哪座山是中国佛教四大名山之一(高级题)峨嵋山 250,“泗水文章昭日月,杏坛礼乐冠华夷”中的“杏坛”指的是:(中级题)C: 孔子讲学的地方 251,目前,不用持身份证件办理的个人储蓄业务有:(中级题)4: 活期储蓄取款 252,人体最坚硬的部分是:(中级题)1: 牙齿 253,以下哪一种商品的需求价格弹性最小(低级题)2: 食盐 254,“海市蜃楼”现象在不同时间内出现的影像不同,有时候是影像呈正象,有时候是影像呈倒象,请问呈倒象的是什么时段(低级题)1: 下午时段 255,金星属于哪类行星(中级题)类地行星 256,被称为“国际会议之都”的城市是:(低级题)日内瓦 257,我国最大的淡水湖是:(高级题)2)鄱阳湖 258,“孑孓”是那种动物的幼虫(中级题)蚊子 259,哪个国家是钻石的最大产出国(吗)(中级题)扎伊尔 260,好莱坞位于美国什么州:(低级题)加利福尼亚州 261, 中国象棋盘上“米”字形的方框称什么(低级题)B: 九宫 262,闪电的传播路径是:(低级题)A: 距离最短的路线 263,“席梦思”三个字源于什么(低级题)B: 人名 264,沙漠之舟--骆驼的驼峰是用来(低级题)2)贮脂肪的 265,债券与股票的区别是什么(低级题)1)债券风险小,收益稳定,股票风险大,收益高 266,参加第一届古代奥运会的国家有:(中级题)3: 三个 267,下面两种扫描仪的感光器件中谁的清晰度和色彩还原度好(低级题)1: CCD 268,光学玻璃的“光学”是指:(中级题)2)专门为制造光学仪器而制 269,股票市场中指数大幅上升又称:(低级题)1)牛市 270,<>是哪部电影的主题歌(高级题)2)<> 271,水上芭蕾又称:(低级题)2)花样游泳 272,把进化论介绍到中国,并整整影响了一代人的世界观的译著是:(中级题)1)《天演论》 273,海马是马吗(低级题)2)不是 274,UNESCO是什么国际组织的简称(中级题)1: 联合国科教文组织 275,发射第一颗人造卫星的国家是:(低级题)1)前苏联 276,“艾叶”燃烧的烟能驱蚊蝇,对吗(低级题)2)对 277,鱼有心脏吗(低级题)1)有(脊椎动物都有心脏.鱼是脊椎动物)278,企鹅是否可以生活在赤道附近(低级题)1: 可以 279,下面哪一个是电视剧《笑傲江湖》中梅庄守门人丁坚的绰号(高级题)一字电剑 280,《卡萨布兰卡》由谁主演(低级题)1: 英格丽 褒曼 281,乒乓球比赛中,甲方进攻时未将球打在台内,而是直接打到了台外乙方的球拍上,请问该球应判谁得分(低级题)2)乙方得分 282,下列哪个作家不是法国人(高级题)5)海涅 283,人们购买保险,为的是满足人们的什么需要(低级题)1)安全 284,中国古代名医华佗为谁所杀(高级题)曹操 285,自称“白蒙古”的民族是哪一民族(中级题)D: 土族 286,能使淀粉变成蓝黑色的是:(中级题)碘酒 287,老年斑仅出现在人体表面吗(低级题)1: 不是 288,“吹箫吴市”中的“吹箫”是用来婉指:(低级题)3: 乞丐 289,中国民间的“冬九九”是从哪一天开始的(中级题)2)冬至 290,金饰品中,12K的含义是:(低级题)2)金饰含纯金50% 291,“瘦金体”由谁所创(低级题)2)宋徽宗 292,马头琴是我国哪一民族的拉弦乐器(低级题)1)蒙古族 293,码头一般建在河流的:(高级题)1)凹岸 294,下列哪部著名歌剧不是根据法国作家的作品改编的(高级题)2)《图兰朵》(普契尼)295,我国最著名的热水湖是哪一个(中级题)2)西藏羊八井 296,经常食用以下哪种食物容易引起铅中毒(高级题)5)松花蛋 297,“藕”是莲的:(低级题)1: 茎 298,“光年”是什么单位(低级题)1: 长度单位 299,最原始的哺乳动物-鸭嘴兽是:(低级题)卵生的 300,“皇帝”作为国家元首的正式称号,始于:(高级题)秦始皇 机甲旋风星际头脑王之月球题库，机甲英雄，论战月球，看看谁最聪明哦，下面是雪豹收集到的机甲旋风星际头脑王之月球题库的问题和答案哦，一起来看下吧。 1、【趣味题】太阳、月亮、星星哪个是哑巴【星星】 2、【趣味题】是天比较大，还是月比较大？【月大】 3、【趣味题】月亮上去过外星人吗？【去过】 4、【趣味题】太阳和月亮什么时候走到一起【明天】 5、【趣味题】太阳厉害还是月亮厉害？【月亮】 6、【趣味题】明月生于何处？【海上】 7、【趣味题】十五的月亮多少钱？【16元】 8、地球的晚上看到月亮上的黑斑是【月亮凹凸不平的地表】 9、地球上因为月亮而产生的自然现象有【潮起潮落】 10、地球上96千克的物体在月球上质量为多少？【96千克】 11、在地球上是否可能同时看到月亮与太阳【可能】 12、月亮会发光吗？【不会，月亮是反射的太阳的光】 13、月亮每天在什么时候升起【月亮每天升起的诗句比前一天晚50分钟】 14、月亮上肉眼能看见长城么？【不能】 15、月核的温度大概是多少？【约1000℃】 16、月球上大大小小的“坑”是怎么回事【陨石撞击形成】 17、月球上的宇航员通过什么相互沟通【信号】 18、月球只有一面是朝向地球的，地球上能看到的月球表面积的：【59%】 19、月球最高温度为多少【127°C】 20、月球最低温度为多少？【零下183摄氏度】 21、月球和地球平均轨道半径为多少？【384401公里】 22、月球正在慢慢的原理地球，它每年离开的距离是？【3厘米】 23、月球与地球的距离有变化吗？【有，月亮绕着地球的轨道是椭圆形的】 24、月球与地球的关系是？【月球是地球的卫星】 25月球的平均公转周期为【27.32天】 26、月球的半径是多少？【1738公里】 27、月球属于什么样的星体？【卫星】 28、月球上绝大多数的环形山是怎么形成的？【陨石、小行星、彗星撞击】 29、月球蕴含丰富的核聚变材料，这种材料在地球上极为稀有【氦-3】 30、以下哪个是古人关于月球的猜想？【地月同源】 31、以下哪个不是关于月亮的雅称？【白驹】 32、以下哪个不是关于月球的传说【猴年马月】 33、为什么月亮上听不到声音【月球上没有空气】 34、为什么月亮上的昼夜温差特别大？【因为月球没有大气】 35、为什么会发生“月食”现象【太阳与地球与月亮成一直线时】 36、为什么地球上看到的月亮是黄色的？【地球大气的原因造成的】 37、下列哪个不是行星【月球】 38、什么地方看到的月亮最大【月球上】 39、哪个国家的哪一位宇航员第一次踏上月球【美国的阿姆斯特朗】 40、中国古代的诗歌中月亮通常被寄托了什么情感【思乡】 41、“嫦娥奔月”是中国古老。。不死之药服之。出自【淮南子•览冥训】 42、月震是否的能量相当于地震的几分之几【一亿分之一】 43、人到了月球上位什么变得那么轻？【因为月球引力小】 44、你知道人类是什么时候第一次登上月球的？【1969年7月20日】 45、你知道月球上有哪些可以利用的资源？【硬金属】 46、有种舞步叫“月球谩步”，请问该舞步固为谁而广为人知。【迈克尔杰克逊】 47、民间所说“天狗吃月”指的是哪种自然现象。【月食】 48、第一个登上月球的阿波罗11号上一共载有几名宇航员【3】第四篇：科技节游戏题目（推荐）
第五篇：游戏玩家题目
点击咨询 