回 帖 发 新 帖 刷新版面

主题:请教问题!难题!

编写程序:输入5,打出以下图形:
                  edcbabcde
                  edcbabcde
                  edcbabcde
                  edcbabcde
                  edcbabcde

回复列表 (共17个回复)

沙发

紧急!!!!!!!!!!!!!!!!

板凳

input n
for i=1 to n
  ?"edcbabcde"
next i
end

3 楼

简单

4 楼

if you are a  pig then                
print             edcbabcde
                  edcbabcde
                  edcbabcde
                  edcbabcde
                  edcbabcde
end if
end

5 楼

cls
input N
for I=1 to N
?"edcbabcde"
next
end

6 楼

那题打错了,是输入3,打出:
               cbabc
                bab
                 a
                bab
               cbabc

7 楼

前面那题有个条件:
      例:输入3
        bab
        bab
        bab
      输入7
      dcbabcd
      dcbabcd
      dcbabcd
      dcbabcd
      dcbabcd
      dcbabcd
      dcbabcd
      

8 楼

CLS
INPUT N
M=N\2
FOR I=1 TO N
  FOR J=-M TO M
    PRINT CHR$(ABS(J)+97);
  NEXT J
  PRINT
NEXT I
END

9 楼

[color=0000FF][size=3]楼主:
CLS
INPUT n
a$ = "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
a$ = a$ + a$ + a$
b$ = LEFT$(a$, n): lb = LEN(b$)
FOR i = 1 TO n
 FOR j = lb TO 2 STEP -1
  PRINT MID$(b$, j, 1);
 NEXT j
 PRINT b$
NEXT i
END

6楼:
CLS
INPUT n
a$ = "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
a$ = a$ + a$ + a$
FOR i = n TO 1 STEP -1
 GOSUB sub1
NEXT i
FOR i = 2 TO n
 GOSUB sub1
NEXT i
END
sub1:
 b$ = LEFT$(a$, i)
 lb = LEN(b$)
 PRINT SPC(n - i);
 FOR j = lb TO 2 STEP -1
  PRINT MID$(b$, j, 1);
 NEXT j
 PRINT b$
RETURN[/size][/color]

10 楼

7楼说的是哪题?每行输出n \ 2 * 2个

我来回复

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