run1120-CSDN博客

原创 forth 探寻之无限递归（类尾递归）

程序设计最有趣的地方就在于递归，递归可以通过另一种方式实现重复，实现循环。就像两面镜子，相互对望，镜子中的镜子永远没有止境。但递归有个缺点就是非常容易栈溢出，如果没有栈溢出，又没有设置递归终止条件，那么递归就像个黑洞一样，循环自己无边无尽。为防止溢出，多数程序设计语言都有尾递归的表达，但真正支持尾递归的需要进行尾递归优化，似乎只有C语言和lisp语言行。今天再一种程序语言，那就是forth。我不知道forth的这种递归方法是不是就是尾递归，我称其为类尾递归。如从1+2+3+...+n...

2020-12-09 23:43:21 255

原创 Forth 探索之嵌套循环 Do...Loop

用1至4这四个数来列出不重复的三位数，用Forth怎么编写？Forth 中的定循环可以嵌套，如九九乘法是两重嵌套。还可以有三层嵌套。如本题，如何解决？Forth在嵌套循环的数字表示用k,j,i来表示，i表示最里层，j表示中间层，k表示最外层，于是可以写成：: four2 05 1 do 5 1 do 5 1 dok j <> j i <> and k i <> and if k i u.r j 1 u.r i 1 u.r spa...

2020-11-04 23:36:13 413

原创 forth 探究之找出最大值和最小值

Forth可以很方便的在一组数字中找出最大和最小数，可用forth会很有意思！要找出一组数中的最大数和最小数，通常我们会怎么思索呢？互联网上百度？QQ里求助？查阅使用的编程语言说明？还是自己去想？要是自己能去先想想会更有收获。这个问题实在简单，简单到用python就一句话：最大数 max([5,6,0,-1])，最小数 min([5,6,0,-1])。可问题看似解决了，自己却并没有懂，就像python中的set去重一样，很多功能在标准库中拿来使用就可以了，...

2020-10-25 20:22:21 187

原创 forth探究之循环续 --1至100累加和

用forth来求1 + 2 +...+ 100: sum 0 101 1 do i + loop ;运行sum：直接显示5050.如果要参数运行 101 1 sum呢？重新优化sum为: sum 0 -rot do i + loop ;运行101 1 sum, 显示5050. ...

2019-01-27 21:08:45 306 1

原创 forth探究之循环 --九九乘法表

循环在forth中很简单：定循环 do ... loop ;do先判断栈中前两位数值，作为循环的上限和初始值，如从0循环至9，用forth实现就是：10 0 do i . loop 双重循环一样这现：10 0 do 10 0 do i . j . loop i 是外循环值，j是内循环的值。用forth实现的九九乘法表：: 99tables \ 九九乘法表 cr...

2019-01-06 20:36:00 261

原创 Forth 探究之你好世界

要是你能看到这篇博客的话，首先要确认你是否在寻找一门计算机语言而不是第四版第四级等序号中的第四？其次还需确定你在此之前有没有学过python之类的通用语言，因为这样就会有比较。当然人生苦短，python学得不错的话很可能也会不再来看forth了。其实我是想说很可能学完python之后你也就没时间来学其他语言了，任何语言（技能）都不好学，有的易学难精，易学难运用，有的更是难学难精。python也...

2018-11-24 11:12:55 336

原创 Forth 探究之简单算术运算

这是用forth实现的斐波那契数Fibonacci第40项数为：: fib 38 0 DO 2DUP + ROT DROP LOOP ;1 1 fib . cr显示结果：102334155两行代码完成！通过同其他编程语言实现的fib计算法相比较，可见forth语言的特别之处。一、算术运算表示forth算术运算采用逆波兰方式，即2+5 要表示成2 5 +。这样可以将数...

2018-11-19 23:08:26 221

转载新手如何学python

作为新人，对于如何学好PYTHON也是一头雾雨，也很想能得到别人的帮助。今天看到这篇文章，感觉学习起来有了一个方向.现摘录如下,以便给自己的学习提供一个参考，引用来源：http://www.itzn.cn/html/jiaoben/python-perl-VBA/200812/19-3285.html根据本人的学习经验，我总结了以下十点和大家分享：1）学好python的第一步，就是马上到

2012-04-07 22:21:24 304

run1120的专栏