主题:求QBASIC文本作图问题
求助:文本作图问题:
1
1 2 1
1 2 3 2 1
我对上面的文本作图问题是这样编程的:
cls
for i=1 to 3
print tab(10-3*i);
for j=1 to 2*i-1
if j<=i then
print j;
else
print 2*i-j;
end if
next j
print
next i
end
而对如下程序:
1
1 2 1
1 2 3 2 1
1 2 1
1
上面程序的编程如下其中空的地方,应该是输出语句,绞尽脑汁,想不出表达式,请大家帮我?
for i=-2 to 2
print tab(3*abs(i)+1);
for j=-(2-abs(i)) to 2-abs(i)
next j
print
next i
end
1
1 2 1
1 2 3 2 1
我对上面的文本作图问题是这样编程的:
cls
for i=1 to 3
print tab(10-3*i);
for j=1 to 2*i-1
if j<=i then
print j;
else
print 2*i-j;
end if
next j
next i
end
而对如下程序:
1
1 2 1
1 2 3 2 1
1 2 1
1
上面程序的编程如下其中空的地方,应该是输出语句,绞尽脑汁,想不出表达式,请大家帮我?
for i=-2 to 2
print tab(3*abs(i)+1);
for j=-(2-abs(i)) to 2-abs(i)
next j
next i
end