返回列表

当面点师碰到数学

本帖最后由 isea 于 2013-3-24 21:49 编辑

源自:2009年上海市普通高等学校春季招生考试 数学卷第11题。

偶以前没注意,这是第一次见到,觉得有点意思——

以下是面点师一个工作环节的数学模型:如图(图略),在数轴上截取与闭区间$[0,4]$对应的线段,对折后(坐标$4$所对应的点与原点重合)
再均匀地拉成$4$个单位长度的线段,这一过程称为一次操作(例如在第一次操作完成后,原来的坐标$1$、$3$变成$2$,原来的坐标$2$变成$4$,等等)。
那么原闭区间$[0,4]$上(除两个端点外)的点,在第$n$次操作完成后($n \ge 1$),恰好被拉到与$4$重合的点所对应的坐标为$f(n)$,则$f(3)=?$;$f(n)=?$。

标题还很好听,吸引人。
还改遍了原题:http://wenku.baidu.com/view/66ce24c58bd63186bcebbc0e.html

2# yes94


这个题似乎还只能通过归纳法,慢慢寻找规律

递推式似乎不好办,似乎,……

本帖最后由 李斌斌755 于 2013-3-25 15:17 编辑

3# isea

N次操作后,面条被拉长到2^n倍,每倍段长相当于原面条的4/2^N=1/2^(n-2)长度。看看拉伸
后各段终点对应坐标情况:先看第一段,其终点对应的原坐标为1/2^(n-2);第二段其终点对应
的原坐标为2*1/2^(n-2);第三段其终点对应的原坐标为3*1/2^(n-2)……第2^n段其终点对应的
原坐标为2^n*1/2^(n-2)。奇数段终点落在数轴4点上。
     故   f(n)=i/2^(n-2)     (i属于[1,2^n]内奇数)

本帖最后由 isea 于 2013-3-25 14:27 编辑
3# isea

N次操作后,面条被拉长到2^n倍,每倍段长相当于原面条的4/2^N=1/2^(n-2)长度。看看拉伸
后各段终点对应坐标情况:先看第一段,其终点对应的原坐标为0、1/2^(n-2);第二段其终点对应
的原坐标为2*1/2^( ...
李斌斌755 发表于 2013-3-25 10:21
改下直接的数学公式:(好像翻译得不对劲,楼上似乎不是这个意思)

$N$次操作后,面条被拉长到$2^n$倍,每倍段长相当于原面条的$\dfrac4{2^N}=\dfrac{1}{2^{(n-2)}}$长度。看看拉伸
后各段终点对应坐标情况:先看第一段,其终点对应的原坐标为$0、\dfrac1{2^{(n-2)}}$;第二段其终点对应
的原坐标为$2 \cdot \dfrac1{2^{(n-2)}}$;第三段其终点对应的原坐标为$3 \cdot \dfrac{1}{2^{(n-2)}},\cdots$第$2^n$段其终点对应的
原坐标为$\dfrac{2^n \cdot 1}{2^{(n-2)}}$。奇数段终点落在数轴4点上。
      故   $f(n)=\dfrac{i}{2^{(n-2)}}$     ($i\in[1,2^n]$内奇数)

PS:在数学公式两端加$\$$符号即显示为公式,论坛。

分式复杂一些,分式代码是 \dfrac{113}{355},
显示出来是:$\dfrac{113}{355}$

5# isea

美元符前加反斜杠就可以生成普通的美元符。
基本信息:kuing,GG,19880618~?,地道广州人,高中毕业,无业游民,不等式爱好者,论坛混混;
现状:冇钱又冇样、冇型又冇款、冇身材又冇文采、冇学历又冇能力、冇高度冇速度冇力度兼夹冇野做!(粤语)

5# isea

谢谢isea,还得学习输入

将过程画一下就很清楚了

lm.gif
(42.45 KB)
2013-3-25 15:40


这样,结果显然就是 $4\cdot\dfrac k{2^n}$,其中 $k=1$, $3$, $5$, \ldots, $2^n-1$。
基本信息:kuing,GG,19880618~?,地道广州人,高中毕业,无业游民,不等式爱好者,论坛混混;
现状:冇钱又冇样、冇型又冇款、冇身材又冇文采、冇学历又冇能力、冇高度冇速度冇力度兼夹冇野做!(粤语)

上图的 Mathematica 代码
  1. lmcs = 6;
  2. f[1] = ListLinePlot[{{0, 0}, {4, 2}, {0, 4}},
  3.    PlotRange -> {{0, 4}, {0, 4}}, AspectRatio -> 1];
  4. Do[{asdf1 = Table[{(1 + (-1)^(k + 1)), 4 k/2^n}, {k, 0, 2^n}];
  5.   f[n - 1/2] =
  6.    ListLinePlot[asdf1, PlotRange -> {{0, 4}, {0, 4}},
  7.     AspectRatio -> 1];
  8.   asdf2 = Table[{2 (1 + (-1)^(k + 1)), 4 k/2^n}, {k, 0, 2^n}];
  9.   f[n] = ListLinePlot[asdf2, PlotRange -> {{0, 4}, {0, 4}},
  10.     AspectRatio -> 1];}, {n, 2, lmcs}]
  11. lm = Table[f[n], {n, 1, lmcs, 1/2}]
  12. Export["lm.gif", lm, ImageSize -> Large]
复制代码
生成的图片默认放在C:\Documents and Settings\Administrator\My Documents,但是打开发现动画太快了,于是我上面的图还经过处理,放慢了速度,优化了大小。
基本信息:kuing,GG,19880618~?,地道广州人,高中毕业,无业游民,不等式爱好者,论坛混混;
现状:冇钱又冇样、冇型又冇款、冇身材又冇文采、冇学历又冇能力、冇高度冇速度冇力度兼夹冇野做!(粤语)

好高级的手段,以后慢慢学学!

10# yes94

我就懂那么点了……昨天群里进的那位问的我看都看不懂
基本信息:kuing,GG,19880618~?,地道广州人,高中毕业,无业游民,不等式爱好者,论坛混混;
现状:冇钱又冇样、冇型又冇款、冇身材又冇文采、冇学历又冇能力、冇高度冇速度冇力度兼夹冇野做!(粤语)

11# kuing
我一点都不懂

返回列表