Qbasic编程题!急!

来源:百度知道 编辑:UC知道 时间:2024/05/14 12:31:31
第一题:
1
121
12321
1234321
123454321
第二题:
5
444
33333
2222222
111111111

都要用Qbasic做出来,并且是编程出来,谢谢了!我实在是不会!谢谢了!

第一道:
CLS
FOR i = 1 TO 5
PRINT TAB$(30 - i); 'y
FOR j = -(i - 1) TO i - 1
PRINT USING "#"; i - ABS(j);
NEXT j
PRINT
NEXT i
END
第二道:
CLS
FOR i = 1 TO 5
PRINT TAB$(30 - i); 'y
FOR j = -(i - 1) TO i - 1
PRINT USING "#"; 5 - i + 1;
NEXT j
PRINT
NEXT i
END
你应该是要编对称的吧?如果不是,就把加“y”的那一行删掉。

有没有什么输入输出的要求?
还是没有输入?
输入什么?
给个样例吧!