回 帖 发 新 帖 刷新版面

主题:儿子参加一个BASIC培训,有许多题不会做,请教高手(5)

利用二重循环,打印如下图形.
     F
    FEF
   FEDEF
  FEDCDEF
 FEDCBCDEF
FEDCBABCDEF
 FEDCBCDEF
  FEDCDEF
   FEDEF
    FEF
     F

    下面的程序能够正确地在屏幕显示出所要求的图形,请将程序补充完整.
当下述完整程序运行时,如果输入整数5,便得到上术显示结果.
BASIC语言

REM Test41
INPUT "n=";n
FOR i=-n TO n
 t=(  第1个填空  )
 a=n
 PRINT TAB(t+10);
 for j=1 TO 2*(n-t)+1 
   PRINT CHR$(a+65);
   IF ( 第2个填空 ) THEN
      a=a+1
   ELSE
     a=a-1
   END IF
 NEXT j
 PRINT
NEXT i
END

此题是完形填空  1处填:          2处填:


回复列表 (共2个回复)

沙发

REM Test41
INPUT "n="; n
FOR i = -n TO n
 t = ABS(i)
 a = n
 PRINT TAB(t + 10);
 FOR j = 1 TO 2 * (n - t) + 1
   PRINT CHR$(a + 65);
   IF j > n - t THEN
      a = a + 1
   ELSE
     a = a - 1
   END IF
 NEXT j
 PRINT
NEXT i
END

1处填: ABS(i)      2处填: j > n - t


板凳

ABS(i)
j > n - t

我来回复

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