Pascal语言当型循环设计两例
pascal语言是国际通用的主流程序设计语言之一，也是各类计算机竞赛的主要参赛语言之一。pascal语言进行程序设计和具备调试程序的能力，为其他程序设计课程的学习和应用打下了基础。pascal语言功能强大，数据类型丰富，用pascal语言编写的程序具有结构严谨、格式优美、流程清晰、便于阅读和和理解等特点，因此pascal语言一直被当作训练结构化程序设计的首选语言。随着我国信息学奥林匹克竞赛的影响越来越大，pascal语言的培训起点也从初中降到小学。小学生pascal语言培训有哪些特点和差异呢？笔者有幸结缘小学生pascal语言的培训与辅导，下面将培训辅导中“循环语句结构程序设计”一节中2例的思考和做法与大家共享。
1、放暑假学校组织夏令营来到一个农场，农场主热情的接待了同学们。在参观时，同学们发现在农场的左上角圈出了一块地方，这儿阳光充足，通风也不错，但却什么也没有，觉得很奇怪。农场主告诉大家因为农场四周许多小朋友因没钱交学费而缀学，所以决定引进品种优良的雌雄一对小白兔进行饲养。小白兔需经过一个月才能长大，长大后每个月都生雌雄一对小白兔。想等小白兔繁殖到1000对的时候，在分发给周围贫困的学生，希望能帮助他们重新步入课堂。现正在写一份预算报告，其中预计所需时间却没算出来。现在就让同学们来帮助这位好心的农场主算出时间。
pascal语言还有人用吗
问题分析
这问题从表面来看好象没有什么规律，不妨设计一张表格来推算一下。（表1）
■
因为第一个月小白兔没长大，所以兔子数是1对。到了第二个月小白兔长大了，生了一对小白兔，兔子数是2对。第三个月小白兔也长大了，大白兔是2对，它们都生了一对小白兔，兔子数是4对……。依此类推，发现除了第一个月，其它都是：前一个月的兔子对数 × 2 = 本月兔子数 。我们发现这又是一个循环，直到兔子数为1000对的时候结束。可是用for语句显然不行，因为我们不知道循环的次数。下面我们用当型循环（while/do语句）来编写程序。