急求，加60~90分！！！(2) — 编程爱好者社区

您所在位置：社区首页 — QBasic讨论区 — 急求，加60~90分！！！(2)

回帖发新帖刷新版面

主题：急求，加60~90分！！！(2)

紫月蓝风 [专家分：30] 发布于 2007-05-06 20:29:00

请大家把没加分的程序发在这

本帖地址： http://bbs.pfan.cn/post/230669.html

回复列表（共5个回复）

沙发

紫月蓝风 [专家分：30] 发布于 2007-05-06 20:30:00

我问的问题

板凳

紫月蓝风 [专家分：30] 发布于 2007-05-06 20:30:00

就是那个“急求，加60~90分！！！”

3 楼

＆佑慧妹妹＆ [专家分：660] 发布于 2007-05-06 20:31:00

CLS
DIM A(6)
A(1)=1
A(2)=1
FOR I = 3 TO 6
A (I) = A(I-1)+A(I-2)
NEXT I
FOR I = 2 TO 6
PRINT TAB (10+I)
S = A(I)
FOR J = 1 TO S
PRINT "*";
NEXT J
PRINT
NEXT I
END

4 楼

＆佑慧妹妹＆ [专家分：660] 发布于 2007-05-06 20:31:00

for i=1 to 5
  print tab (10+i);
  for j=1 to i
  print "*";
  next j
  print
next i
end

5 楼

＆佑慧妹妹＆ [专家分：660] 发布于 2007-05-06 20:33:00

加分，谢谢

我来回复

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