Question

pascal编程问题？

我想这应该是pascal中的循环结构吧。
希望能得到您热心的帮助！非常感谢！

Answer 1

LZ应该是初学pascal，给楼主一些建议：
对于初学者而言，最宝贵的就是这些小题目能够独立思考、解决，然后感受自己独立解决问题的乐趣，因此大大增加学习的信心，这对以后的学习的推动力相当重要

这种同类题目一般是给你讲解一题，其他题目自己独立解决，LZ一定注意要学习解决问题的方法而不是学习这个问题的答案。
不瞒楼主，我初学时做过第（1）、（4）两题，当时也是独立解决，想了很长时间才做出
下面我开始讲解吧
1.这类题目一般要经历以下过程：找出变化规律、总结规律
我们先列出小的例子
n=2
**** ****
**** ****

n=3
**** ****
**** ****
**** ****
规律其实很明显，n代表的是输出的行数，然后就是不同的行的****之间的空格不同
然后我们进一步去总结归纳：总体来说每一行是由四个部分构成 空格****空格****
我们只需要把握两个空格的数量与 第i行以及n之间 的关系
很明显，第一部分空格数量是0，1,2,3,4……
第二部分空格稍有难度，但是最简单的第n行入手发现：第n行是1个，第n-1行是3个，第n-2行是5个…………
由此我们归纳出，第i行的个数为 2*（n-i）+1
至此程序已经不难写出：
for i:=1 to n do
begin
for j:=1 to i-1 do write(' '); //输出第一部分空格，是i-1个空格
write('****');
for j:=1 to 2*(n-i)+1 do write(' '); //输出第二部分空格，是 2*(n-i)+1个空格
write('****');
end;

后面三题，LZ自己解决吧，做出来的话对LZ是非常有好处的，如果实在不会再来问我吧

Answer 2

很简单，自己想一想