使用循环语句打印出以下这个三角形.(如补充)01 22 3 43 4 5 64 5 6 7 85 6 7 8 9 106 7 8 9 10 11 127 8 9 10 11 12 13 14 8 9 10 11 12 13 14 15 169 10 11 12 13 14 15 16 17 18
来源:学生作业帮助网 编辑:作业帮 时间:2024/07/07 11:37:56
![使用循环语句打印出以下这个三角形.(如补充)01 22 3 43 4 5 64 5 6 7 85 6 7 8 9 106 7 8 9 10 11 127 8 9 10 11 12 13 14 8 9 10 11 12 13 14 15 169 10 11 12 13 14 15 16 17 18](/uploads/image/z/7621068-12-8.jpg?t=%E4%BD%BF%E7%94%A8%E5%BE%AA%E7%8E%AF%E8%AF%AD%E5%8F%A5%E6%89%93%E5%8D%B0%E5%87%BA%E4%BB%A5%E4%B8%8B%E8%BF%99%E4%B8%AA%E4%B8%89%E8%A7%92%E5%BD%A2.%EF%BC%88%E5%A6%82%E8%A1%A5%E5%85%85%EF%BC%8901+22+3+43+4+5+64+5+6+7+85+6+7+8+9+106+7+8+9+10+11+127+8+9+10+11+12+13+14+8+9+10+11+12+13+14+15+169+10+11+12+13+14+15+16+17+18)
使用循环语句打印出以下这个三角形.(如补充)01 22 3 43 4 5 64 5 6 7 85 6 7 8 9 106 7 8 9 10 11 127 8 9 10 11 12 13 14 8 9 10 11 12 13 14 15 169 10 11 12 13 14 15 16 17 18
使用循环语句打印出以下这个三角形.(如补充)
0
1 2
2 3 4
3 4 5 6
4 5 6 7 8
5 6 7 8 9 10
6 7 8 9 10 11 12
7 8 9 10 11 12 13 14
8 9 10 11 12 13 14 15 16
9 10 11 12 13 14 15 16 17 18
使用循环语句打印出以下这个三角形.(如补充)01 22 3 43 4 5 64 5 6 7 85 6 7 8 9 106 7 8 9 10 11 127 8 9 10 11 12 13 14 8 9 10 11 12 13 14 15 169 10 11 12 13 14 15 16 17 18
可以直接写在Form_Paint事件里,也可以写到一个按钮事件里,代码如下:
Private Sub Form_Paint()
Dim i As Integer, j As Integer
Dim tmp As String
For i = 0 To 9
For j = i To 2 * i
tmp = tmp & j & " "
Next
Print tmp
tmp = ""
Next
End Sub
var
i,j:integer;
begin
for i:=0 to 9 do begin
for j:=i to i*2 do write(j);
writeln;
end;
readln;
end.