回 帖 发 新 帖 刷新版面

主题:我是初学者请大家帮忙谢了》

编程打印下面的图形
                %
               %  %
              %    %
             %%%%%%%%
谢了呀

回复列表 (共7个回复)

沙发

tab

板凳

print tab(4)"%"
print tab(3)"%" ;tab(5)"%"
print tab(2)"%" ;tab(6)"%"
print "%%%%%%"
end
最简单的编法 哈哈

3 楼

DIM(I)
  PRINT LET (21) "***"
   PRINT LET (22)"***"
  PRINT LET  (25-I) "***"
    PRINT 21/I
   PRINT
    END

4 楼

最简单的编法?未必。我再帮你缩写一下。
c$=chr$(13):print "    %";c$;"   % %";c$;"  %   %";c$;" %%%%%%%"

不过有点奇怪的是最后一行应该是7个%才对的,怎么变成8个了?那可怎么办了?

5 楼

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 楼

print("   "+"%")
print("  "+"% %")
print(" "+"%  %")
print("%%%%%%%%")
超简单,嘻嘻

7 楼

喔? 超简单?
你用的是什么BASIC ?
我没见过呢.
能运行成功吗?
在QB里应该是不行的吧.

我来回复

您尚未登录,请登录后再回复。点此登录或注册