2014年国际原油价格:双重循环之绘制图形

来源:百度文库 编辑:高考问答 时间:2024/05/06 00:52:39
1、 1
222
33333
4444444
555555555

2、 1
121
12321
1234321
123454321
1234321
12321
121
1
Pascal编程

1、
For i = 1 To 5
Print Space(5 - i);
For j = 1 To 2 * i - 1
Print CStr(i);
Next
Print
Next

2、
For i = 1 To 5
Print Space(5 - i);
Print ((10 ^ i - 1) / 9) ^ 2;
Print
Next
For i = 4 To 1 Step -1
Print Space(5 - i);
Print ((10 ^ i - 1) / 9) ^ 2;
Print
Next