pascal解答一、字符统计（文件名：ZFTJ.PAS ZFTJ.BAS ZFTJ.LGO）输入一串字符，将数字字符、字

pascal解答
一、字符统计（文件名：ZFTJ.PAS ZFTJ.BAS ZFTJ.LGO）
输入一串字符，将数字字符、字母字符和其它字符分别计数，并输入计数结果，输入的字符以“？”号结束，“？”号不计数，输出共有3行，分别为输入文件中的数字字符、字母字符和其它字符的数目。
输入输出示例：
输入：Abcd #*% 234
SGUZI：3
ZIMU：4
QITA：5
二、小球路程（文件名:XQLC.PAS XQLC.BAS XQLC.LGO）
已知小球从100米高度自由下落，落地后反弹起，又落地，又弹起。。。。。。，每次弹起的高度都是上次高度的一半。求小球N次反弹起的高度和球在整个过程所经过的路程（包括下落和反弹），用键盘输入N，输出反弹高度和经过路程，结果保留两位小数。
输入输出示例：
输入：2
输出：25.00
225.00
三、分装瓶子（文件名：FZPZ.PAS FZPZ.BAS FZPZ.LGO）
回收利用废玻璃瓶子按三种颜色进行分类：棕色、绿色和无色透明，使每一个箱子都为同种颜色的玻璃瓶子。
现在有三个箱子各装有不同颜色的玻璃瓶子，要你在各箱子之间搬移最少数量的玻璃瓶子，使每一个箱子都为同种颜色的玻璃瓶子。
由键盘输入一行9个整数，前3个整数分别为棕色、绿色和透明玻璃瓶子数，放在一号箱子内；中间3个整数分别为棕色、绿色和透明玻璃瓶子数，放在二号箱子内；后3个整数分别为棕色、绿色和透明玻璃瓶子数，放在三号箱子内。输出最少的玻璃瓶子的搬移数。
输入输出示例：
输入：5 10 5 20 10 5 10 20 10
输出：50
四、木偶玩具（文件名：MOWJ.PAS MOWJ.BAS MOWJ.LGO）
有一种玩具，在玩具上有一个红色按纽，一个黄纽和一万个能坐能站的小木偶，按一次红色按纽，就会有一个站着的小木偶坐下去，按一次黄色按纽，就可以使站着的小木偶增加一倍。开始时有三个小木偶站着，要想使站着的小木偶增加到N个，最少按几次扫纽就行了？请编一程序，由键盘输入N（1