回 帖 发 新 帖 刷新版面

主题:想得分的来看看,VERY 简单。

打印下列图形
*****
 ****
  ***
   **
    *
[em12][em19][em3][em7]

回复列表 (共3个回复)

沙发

rem
cls
for i=5 to 1
    tab(40+i);
  for k=1to i
    ?"*";
   next k
    ?
next  i
  end

板凳

cls
input n
for i=1 to n
print tab(i)
for j=1 to n+1-i
print "*";
next j:print
next i
end

3 楼

CLS
FOR I=5 TO 1 STEP -1
? TAB(6-I);
 FOR J=1 TO I
  ? "*";
NEXT J,I

我来回复

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