回 帖 发 新 帖 刷新版面

主题:你打出来了吗?金字塔(考考大家)

来来 
                                  *
                                 ***
                                *****
                               *******
                            
                              *       *
                             ***     ***
                            *****   ***** 
                           ******* *******
                         
                          *       *       *
                         ***     ***     ***
                        *****   *****   *****
                       ******* ******* *******  
                            
                      *       *       *       * 
                     ***     ***     ***     ***
                    *****   *****   *****   ***** 
                   ******* ******* ******* *******

回复列表 (共17个回复)

沙发

print                             *
                                 ***
                                *****
                               *******
                            
                              *       *
                             ***     ***
                            *****   ***** 
                           ******* *******
                         
                          *       *       *
                         ***     ***     ***
                        *****   *****   *****
                       ******* ******* *******  
                            
                      *       *       *       * 
                     ***     ***     ***     ***
                    *****   *****   *****   ***** 
                   ******* ******* ******* *******
end

板凳


CLS
FOR i = 1 TO 4
 PRINT TAB(40 - i);
  FOR j = 1 TO i * 2 - 1
   PRINT "*";
  NEXT j
 PRINT
NEXT i


FOR i = 1 TO 4
 PRINT TAB(36 - i);
  FOR j = 1 TO i * 2 - 1
   PRINT "*";
  NEXT j
  PRINT TAB(43 - i);
  FOR j = 1 TO i * 2 - 1
   PRINT "*";
  NEXT j
 PRINT
NEXT i


FOR i = 1 TO 4
 PRINT TAB(33 - i);
  FOR j = 1 TO i * 2 - 1
   PRINT "*";
  NEXT j
  PRINT TAB(40 - i);
  FOR j = 1 TO i * 2 - 1
   PRINT "*";
  NEXT j
  PRINT TAB(47 - i);
  FOR j = 1 TO i * 2 - 1
   PRINT "*";
  NEXT j
 PRINT
NEXT i


FOR i = 1 TO 4
 PRINT TAB(29 - i);
  FOR j = 1 TO i * 2 - 1
   PRINT "*";
  NEXT j
  PRINT TAB(36 - i);
  FOR j = 1 TO i * 2 - 1
   PRINT "*";
  NEXT j
  PRINT TAB(43 - i);
  FOR j = 1 TO i * 2 - 1
   PRINT "*";
  NEXT j
  PRINT TAB(50 - i);
  FOR j = 1 TO i * 2 - 1
   PRINT "*";
  NEXT j
  PRINT
NEXT i

3 楼

太麻烦了......[em7]

4 楼


林子建,你不是答出来了吗?(⊙_⊙)?

5 楼


cls
input X
for I=1 to X
print
for J=1 to 4
print tab (32-N)
S=32-N
N=N+1
for K=1 to I
print tab(S+8*K)
for L=1 to 2*J-1
print "*";
next L
next k
print
next J
next I
end

6 楼


cls
input X
for I=1 to X
print
for J=1 to 4
print tab (32-N)
S=32-N
N=N+1
for K=1 to I
print tab(S+8*K)
for L=1 to 2*J-1
print chr$(1);
next L
next k
print
next J
next I
end

7 楼

cls
if you is a pig then
  print“ *
                                 ***
                                *****
                               *******
                            
                              *       *
                             ***     ***
                            *****   ***** 
                           ******* *******
                         
                          *       *       *
                         ***     ***     ***
                        *****   *****   *****
                       ******* ******* *******  
                            
                      *       *       *       * 
                     ***     ***     ***     ***
                    *****   *****   *****   ***** 
                   ******* ******* ******* *******”
end if
print “you are pig!”
end

8 楼

呕呕呕

9 楼

7楼欠揍!!!

10 楼

林子建:

赞同
很赞同
非常赞同
Very很赞同

我来回复

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