我只会VBfor n = 1 to 5x = abs(3-n)y = 5-2*xfor i = 1 to x print " "; '一个空格next ifor j = 1 to yprint "*";next jprintnext n我先那去实践下成功 注意第 5 ,8 ,句有";"结尾
