(*内容类型:application/vnd.wolfram.mathematica*)(***Wolfram笔记本文件***)(* 网址:http://www.wolfram.com/nb *)(*CreatedBy='Mathematica 9.0'*)(*CacheID:234*)(*内部缓存信息:笔记本文件断线测试笔记本文件断线测试笔记本数据位置[157,7]笔记本数据长度[13441,448]笔记本选项位置[12523411]笔记本大纲位置[12876,427]单元格标签索引位置[12833,424]窗口框架->正常*)(*笔记本内容开头*)笔记本[{单元格[CellGroupData[{牢房[“帐篷问题”,“标题”],单元格[CellGroupData[{单元格[“作者”,“小节”],单元格[“\<\埃里克·韦斯特因2003年1月19日\\>“,”文本“],单元格[TextData[{“此笔记本下载自”,按钮框[“http://mathworld.wolfram.com/notebooks/PlaneGeometry/TentProblem。\编号“,BaseStyle->“超链接”,按钮数据:>{URL[“http://mathworld.wolfram.com/notebooks/PlaneGeometry/TentProblem.nb"]\,无}],"."}],“文本”],单元格[TextData[{“有关详细信息,请参阅Eric的”,StyleBox[“数学世界”,字体倾斜->“斜体”],“条目”,按钮框[“http://mathworld.wolfram.com/TentProblem.html",BaseStyle->“超链接”,按钮数据:>{URL[“http://mathworld.wolfram.com/TentProblem.html“],无}],"."}],“文本”],单元格[“\<\\[版权所有]2005 Wolfram Research,Inc.,除非另有说明\\>“,”文本“]},打开]],单元格[CellGroupData[{单元格[“代码”,“小节”],单元格[BoxData[行框[{行框[{“TentProblem”,“::”,“usage”}],“=”,"\"\\“”}]],“输入”],单元格[BoxData[行框[{行框[{“TentProblem”,“[”,行框[{“h_List”,“,”,“t_List”,行框[{“模块”,“[”,行框[{行框[{“{”,行框[{行框[{“f”,“=”,行框[{“{”,行框[{行框[{“{”,行框[{“0”、“,”、“0”}]、“}”}],“,”,行框[{“{”,行框[{“1”,“,”,“0”}],“,”,“ha1”,“,”,“ha2”,“,”,“dr”,“,”,行框[{“w”,“=”,“.2”}]},“}”}],“,”,行框[{行框[{“a1”,“=”,行框[{行框[{“2”,行框[{行框[{“垂直线”,“[”,RowBox[{“t”,“,”,“r”}],“]”}],“[”,行框[{“[”,“1”,“]”}],“]“}]}],”-“,”t“}]{],“;”,“\[IndentingNewLine]”,行框[{“a2”,“=”,行框[{行框[{“2”,行框[{行框[{“垂直线”,“[”,行框[{“a1”、“,”、“f”}]、“]”}],“[”,RowBox[{“[”,“1”,“]”}],“]”}]}],“-”,“a1”}]}],“;”,“\[IndentingNewLine]”,行框[{“ha2”,“=”,行框[{“LineLineIntersection”,“[”,行框[{“f”,“,”,行框[{“{”,行框[{“h”、“,”、“a2”}]、“}”}]]、“]”}]}],“;”,“\[IndentingNewLine]”,行框[{“ha1”,“=”,行框[{“LineLineIntersection”,“[”,行框[{“r”,“,”,行框[{“{”,行框[{“ha2”,“,”,“a1”}],“}”}]},“]”}]],“;”,“\[IndentingNewLine]”,行框[{“dr”,“=”,行框[{行框[{“r”,“[”,行框[{“[”,“2”,“]”}],“]“}],”-“,行框[{“r”,“[”,行框[{“[”,“1”,“]”}],“]“}]}]}],”;“,”\[IndentingNewLine]“,行框[{“显示”,“[”,行框[{行框[{“图形”,“[”,行框[{“{”,行框[{行框[{“{”,行框[{行框[{“灰度级”,“[”,“.7”,“]”}],“,”,行框[{“多边形”,“[”,行框[{“{”,行框[{行框[{“r”,“[”,行框[{“[”,“1”,“]”}],“]“}],”,“,”,行框[{“r”,“[”,行框[{“[”,“2”,“]”}],“]“}],”,“,”,行框[{行框[{“r”,“[”,RowBox[{“[”,“2”,“]”}],“]”}],“+”,行框[{“w”,行框[{“{”,行框[{行框[{“dr”,“[”,行框[{“[”,“2”,“]”}],“]“}],”,“,”,行框[{“-”,RowBox[{“dr”,“[”,行框[{“[”,“1”,“]“}],”]“}]}]}],“}”}]}],“,”,行框[{行框[{“r”,“[”,行框[{“[”,“1”,“]”}],“]“}],”+“,行框[{“w”,行框[{“{”,行框[{行框[{“dr”,“[”,行框[{“[”,“2”,“]”}],“]“}],”,“,”,RowBox[{“-”,行框[{“dr”,“[”,行框[{“[”,“1”,“]”}],“]“}]}]}],”}“}]]}]],“}”}],"]"}]}], "}"}], ",", 行框[{“{”,行框[{行框[{“灰度级”,“[”,“.85”,“]”}],“,”,行框[{“多边形”,“[”,行框[{“{”,行框[{行框[{“{”,行框[{“0”、“,”、“0”}]、“}”}],“,”,行框[{“{”,行框[{“1”、“,”、“0”}]、“}”}],“,”,行框[{“{”,行框[{“1”、“,”、“2”}]、“}”}],“,”,行框[{“{”,行框[{“0”,“,”,“2”}],“}”}]],“{”}],行框[{“行”,“[”,“f”,“]”}],“,”,行框[{“行”,“[”,“r”,“]”}],“,”,行框[{“行”,“[”,行框[{“{”,行框[{行框[{行框[{“r”,“[”,行框[{“[”,“2”,“]”}],“]“}],”+“,行框[{“w”,行框[{“{”,行框[{行框[{“dr”,“[”,行框[{“[”,“2”,“]”}],“]“}],”,“,”,行框[{“-”,行框[{“dr”,“[”,行框[{“[”,“1”,“]“}],”]“}]}]}],“}”}]}],“,”,行框[{RowBox[{“r”,“[”,行框[{“[”,“1”,“]”}],“]“}],”+“,行框[{“w”,行框[{“{”,行框[{行框[{“dr”,“[”,行框[{“[”,“2”,“]”}],“]“}],”,“,”,RowBox[{“-”,行框[{“dr”,“[”,行框[{“[”,“1”,“]”}],“]“}]}]}],”}“}]]}]],“}”}],"]"}], ",", 行框[{“{”,行框[{行框[{“虚线”,“[”,行框[{“{”,RowBox[{“.02”,“,”,“.02”}],“}”}],“]”}],“,”,行框[{“行”,“[”,行框[{“{”,行框[{“t”,“,”,“a1”}],“}”}],行框[{“行”,“[”,行框[{“{”,行框[{“a1”,“,”,“a2”}],“}”}],行框[{“行”,“[”,行框[{“{”,行框[{“h”,“,”,“a2”}],“}”}],行框[{“{”,行框[{RowBox[{“厚度”,“[”,“.015”,“]”}],“,”,行框[{“行”,“[”,行框[{“{”,行框[{“h”,“,”,“ha2”,“,"}"}], ",", 行框[{“{”,行框[{行框[{“PointSize”,“[”,“.04”,“]”}],“,”,行框[{“点”,“[”,“t”,“]”}],“,”,行框[{“点”,“[”,“a1”,“]”}],“,”,行框[{“点”,“[”,“a2”,“]”}],“,”,RowBox[{“Point”,“[”,“h”,“]”}],“,”,行框[{“点”,“[”,“ha1”,“]”}],“,”,行框[{“点”,“[”,“ha2”,“]”}]}],“}”}]],“{“}],”]“}]”,“,”,“选项”,“,”,行框[{“纵横比”,“\[Rule]”,“自动”}]}],“]”}]]}],“]”}]}]],“输入”]},打开]],单元格[CellGroupData[{单元格[“图形”,“节”],单元格[CellGroupData[{单元格[BoxData[行框[{“TentProblem”,“[”,行框[{行框[{“{”,行框[{“0”,“,”,行框[{“-”,“.2”}]}],“}”}],”,“,”,行框[{“{”,行框[{“.6”,“,”,行框[{“-”,“.1”}]}],“}”}],”,“,”,行框[{“{”,行框[{行框[{“{”,行框[{“0”,“,”,行框[{“-”,“1”}]}],“}”}],”,“,”,行框[{“{”,行框[{“1”、“,”、“0”}]、“}”}]]、“{”}],“,”,“\n”,行框[{“PlotRange”,“->”,行框[{“{”,行框[{行框[{“{”,行框[{行框[{“-”,“.1”}],“,”,“1”}],行框[{“{”,行框[{行框[{“-”,“.7”}],“,”,“.5”}],单元格[GraphicsData[“PostScript”,“\<\%!%%创建者:Mathematica%%纵横比:1.09091数学图片开始/梅布{Mgmatrix id变换矩阵数据转换}绑定定义/Mabsadd{标记3-1卷添加3 1卷添加exch}绑定定义%%图形%%IncludeResource:font Courier(包含资源)%%IncludeFont:快递/Courier findfont 10 scalefont setfont%缩放计算0.0909091 0.909091 0.636364 0.909091 [[ 0 0 0 0 ][ 1 1.09091 0 0 ]]数学刻度%图形开始1个设置线帽1个setlinejoin新路径0 0米10升1 1.09091升0 1.09091升封闭通道削减新路径.7克.09091至0.27273米1.63636升1.18182.45455升.27273-0.45455升F类0.85克.09091.63636米1.63636升1 2.45455升.09091 2.45455升F类0克.5马布斯维德[]0短划线.09091.63636米1.63636升0.36364米1.63636升1.27273米.72727 0升[0.02.02]0短划线0.63636.54545米.90909.27273升.90909.27273米.90909 1升.09091.45455米.90909 1升.015瓦[]0设置短划线.09091.45455米0.36364.63636升.74545.38182升.63636.54545升0.04瓦.63636.54545百万点.90909.27273百万点.90909 1百万点0.09091.45455百万点.74545.38182百万点0.36364.63636百万点%图形结束数学图片结束\\>“],”图形“,图像大小->{212.875,232.188},图像边缘->{{43,0},{0,0}},图像区域->{{0,1},{0,1} },ImageCache->GraphicsData[“压缩位图”,“\<\eJzdmVlzFFUUxzuZLSuTlWyEDIQkQEJCQkhSIKAiYRFk3wSEJATCkkBIVASR公司RUVQWVQWldIHSx/U8i0fQL+Dzzz7LeLcezr/6en8e3IqNb44VXRO3/s7/3Pu2t2XXQOTI8OjA5PnhgYSW68MXB45NzSR6L90JVkUynEc5+/kv38SjrGnk6Z72Tmd/Dmh6ampKVNg/jo77DU0bauSZeZPn9zscnEXTcNd1BK9gr+lxHsE363E1wq+R4l3C75Xia8RfJ8S7xJ8vxLvFPyAEl8t+EEl3iH4ISXeLvhJb5K8CNKvE3wo0q8VfC3lfhKwY8p8RWCH1fiywU/ocRbBH9HiTcLflKJNwl+SokvE3xAiTcKPqjElwo+pMSXCH5aiScEH1biDYKfUeKLBT+rxOsFH1HiiwQ/p8TrBD+vxGsFv6DEawS/qMSrBR9V4lWCjynxhYJfUuKVgl9W4hWCjyvxcsGvKPEywSeUeKngk0q8RPB3lXhc8PeU+ALB31固定YJfVeJFgn+gxAsFv6bECwS/rsTzBf9QiecJfkOJxwT/SIlHBb+pxCOC31LiYcFvK/GQ4HeUeK7gHxO8z1zDpmgBccwRx0+IY4+5RuGYYyyyLuz6fEp9uc80jPo5zl+BrgMeBO85nhOwCWWLvnXsE6vRD94Mg26xSgT4nIenq6bkLVvuysTnC+LTL1VfkqotvWAVK3wRTJ31YI/JHgLwWsEf0TwJoJHSZnbFY+JRCPBY8ESXxGJtmD8a4K3BuPfELye4AXBEk+IRB3BGwR/SvA逻辑Ef0bwKoIvEfw5wZuDc/9WOcQu/h3BSwileEizxvU8CC6Eo0IfqvDA6dtWxoSmbIwG7pvMI1OKHujwdVeApsB1daAoiRGalZ6yLgiA2jN45VeR2jmx38lWeG7i6g1eDm+Xsfmez1Lvqor4EzF2uucbIPKgNFrMbSSxILF+5IFyxh8jMPq混合InbcT7IJqJk/y6ncIuanOwKYRTbuw5yfYP2aNt5HBGCX9XeybEfWQRRvIRIsE6uDK4T0qRzwRyjKKslIhVBIuVQGKciJUTsfJgsTgW0hjEYmh6mDS9mATIsJxTAUYRIA/ZsgBxEiDDRpMKcAGDlzkA6+9lHjG7jYwg23x0R4iI公司sf5u9AyUFRtGZgXIrI44LvVMF7srDCKLQjjWE8fi4P6pgsRJZFEEsVzSpBoSIHj3l49SK3scoYozBmBNLwwOUAvZowhVjEFx0o9AFxPtDC8HdVA8hChxJO/T公司ThDt/GDtemjvg5XSbiJi7Innii2GxB4kWoJOaCZi8vSQpK3jTlilcGwhjvKk公司kCMkG2cHrDI4riCO7ntpI+L0w0o5thLHcHC7mxD7DVgV6MRVRCwULNaMfF6FlRLrIGL见6KLUc+G2FVoplyJBzxOuK5LvuxdKHNYV16NlZKTqzDaQIp31ZwfenBrdVNWuI6tiFUNyzrmBfk6H4BadnZq0qOK4ljm4/dSBOO6zqdMdcmSIW74R6G6xaGsddmjNxuqC+HNYiSPR4unPm5+C7sRtcM6wGTIxez1h6f47jfse6edmQjRDwHnrPeHi3w/S9VaJYxwSsE0SCvQHJ7ilzIYaHRBTPHroheqZdDSx26ip7nLMeUOqZws5FZRdzNgAvhzVI2sPepeR709mEOKWwThOJPCIhX72ehV4Ma5小时IsLdc+ShwXkfsQlhniUQBkZCdzdmM2DFYI0SikEjIfuZsQewILHaoJzuWbL1xU8PO5nIE2maq7IuGPTNzT2+mzMGMrd9uSvNN6RhJNp7u447zX3ZZiN0z/fLlS7tuLxnL9U9a9q7EXN3DovngvabA9sNlDd5nCux6DhnL7jkXNY6vAb/hr9pM/K/5oT/9BX9oovYj6rAG3wZ8SIPvINApjaMq911IZtxftZv4j/mhPQQa9UN7CXQ0a004gCYc1uCHgB/U4EcItC9ruc+acMfSJ4e36gSqBvxVJ0msN7OWpAoaRHbbNfhp4Fs1+BkCHZ6zM88Tr/1+6AKBNmlyYjvSRo3jKIE2ZG0gxtGz6zT4BIF6NY6TB编号+55DMKriKdNdool4j0GqN43UCdWSt028SqFXjeCtoLnih2wR6xQ/dIdD6eTXmLoakSYPfI9BSjeN9Ai3J2pDMmmkP0KxOf9UjItjuhx4TaNW8UntCoIUax6cEqtQ4PiNQhcbxOYHK59X9L9D9jf6qH4hgwg/9SKCir0WFfQTmpCvwX8mUFTj+AuBqufs4N9NgXtM7av61RTYT5lZsWyV+/-8/3XVb6Yg标准PIkPzcz5D/a4GT8y8JGtI4\\>“],ImageRangeCache->{{0,211.875},{231.188,0}}->{0,0,0}}],单元格[BoxData[标记框[行框[{“\[SkeletonIndicator]”,“Graphics”,“\[SkeletonIndicator'”}],错误,可编辑->错误]],“输出”]},打开]]},打开]]},打开]]},窗口大小->{740,867},窗口边距->{{84,自动},{28,自动}},FrontEndVersion->“9.0 for Mac OS X x86(32位、64位内核)(3月5日\2013)",样式定义->“Default.nb”](*笔记本内容结束*)(*内部缓存信息*)(*单元格标签大纲单元格标签索引->{}*)(*单元格标签索引单元格标签索引->{}*)(*笔记本文件大纲笔记本[{单元格[CellGroupData[{单元格[579,22,29,0,92,“标题”],单元格[CellGroupData[{单元格[633,26,28,0,44,“小节”],单元格[664,28,58,3,49,“文本”],单元格[725,33,283,9,49,“文本”],单元格[1011,44,297,10,30,“文本”],单元格[1311,56,99,2,30,“文本”]},打开]],单元格[CellGroupData[{单元格[1447,63,26,0,44,“小节”],单元格[1476,65,290,5,80,“输入”],单元格[1769,72,6085,165,335,“输入”]},打开]],单元格[CellGroupData[{单元格[7891,242,26,0,80,“部分”],单元格[CellGroupData[{单元格[7942,246,679,24,46,“输入”],单元格[8624,272,3722,128,241,1158,84,“图形数据”,“PostScript”\“图形”],单元格[12349,402,134,4,28,“输出”]},打开]]},打开]]},打开]]}]*)(*内部缓存信息结束*)