数学研发论坛

 找回密码
 欢迎注册

发一个迭代的

已有 794 次阅读2018-8-23 12:25

$8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8}}}}}}}}}}}}}}}}}}}}}}}}}}$
\[8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8^{8}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}\]

$\frac{1}\frac{2}\frac{3}\frac{4}\frac{5}\frac{6}\frac{7}\frac{8}\frac{9}\frac{10}\frac{11}\frac{12}\frac{13}\frac{14}\frac{15}\frac{16}\frac{17}\frac{18}\frac{19}\frac{20}\frac{21}\frac{22}\frac{23}\frac{24}\frac{25}\frac{26}\frac{27}\frac{28}\frac{29}\frac{30}\frac{31}\frac{32}\frac{33}\frac{34}\frac{35}\frac{36}\frac{37}\frac{38}\frac{39}\frac{40}\frac{41}\frac{42}\frac{43}\frac{44}\frac{45}\frac{46}\frac{47}\frac{48}\frac{49}{50}$

#通过循环,由内向外,不断增加底
use strict;use warnings;use diagnostics;
my $str='8^{8}';
my $i=0;
while($i<50)
{
    $str='8^{' . $str . '}';
    $i++;
}
#输出结果
open(FH,">out2.txt");
print FH $str;
close(FH);

[code]
#通过循环,由内向外,不断增加底
use strict;use warnings;use diagnostics;
#指数形式的楼
my $str='8^{8}';
my $i=0;
while($i<50)
{
    $str='8^{' . $str . '}';
    $i++;
}
#输出结果
open(FH,">out2.txt");
print FH $str;
print FH "\n";
close(FH);

#分数形式的楼
$str="\\frac{1}";
$i=2;
while($i<80)
{
    $str=$str . "\\frac{" . "$i" . "}";
    $i++;
}
$str=$str . "{" . "$i" . "}";
#输出结果
open(FH,">>out2.txt");
print FH $str;
close(FH);

[/code]


路过

雷人

握手

鲜花

鸡蛋

评论 (0 个评论)

facelist doodle 涂鸦板

您需要登录后才可以评论 登录 | 欢迎注册

小黑屋|手机版|数学研发网 ( 苏ICP备07505100号 )

GMT+8, 2020-10-30 00:47 , Processed in 0.029058 second(s), 15 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

返回顶部