主题:我是初学者请大家帮忙谢了》
枫叶红
[专家分:0] 发布于 2005-05-13 15:14:00
编程打印下面的图形
%
% %
% %
%%%%%%%%
谢了呀
回复列表 (共7个回复)
沙发
binbin520 [专家分:60] 发布于 2005-05-13 17:43:00
tab
板凳
网中看客 [专家分:0] 发布于 2005-05-13 17:55:00
print tab(4)"%"
print tab(3)"%" ;tab(5)"%"
print tab(2)"%" ;tab(6)"%"
print "%%%%%%"
end
最简单的编法 哈哈
3 楼
mind [专家分:0] 发布于 2005-05-14 14:05:00
DIM(I)
PRINT LET (21) "***"
PRINT LET (22)"***"
PRINT LET (25-I) "***"
PRINT 21/I
PRINT
END
4 楼
moz [专家分:37620] 发布于 2005-05-14 16:48:00
最简单的编法?未必。我再帮你缩写一下。
c$=chr$(13):print " %";c$;" % %";c$;" % %";c$;" %%%%%%%"
不过有点奇怪的是最后一行应该是7个%才对的,怎么变成8个了?那可怎么办了?
5 楼
lwm1988 [专家分:90] 发布于 2005-08-27 19:01:00
for i=1 to 4
print tab(15-i);
for j=1 to 2*i-1
if j=1 or j=2*i-1 or i=4 then
print "%";
else
print " ";
end if
next j
print
next i
end
6 楼
dorremon1992 [专家分:870] 发布于 2005-08-27 20:56:00
print(" "+"%")
print(" "+"% %")
print(" "+"% %")
print("%%%%%%%%")
超简单,嘻嘻
7 楼
moz [专家分:37620] 发布于 2005-08-27 21:20:00
喔? 超简单?
你用的是什么BASIC ?
我没见过呢.
能运行成功吗?
在QB里应该是不行的吧.
我来回复