UC知道for循环嵌套
来源：百度知道 编辑：UC知道 时间：2024/09/28 14:33:13
*
* * *
* * * * *
* * * * * * *
这个的代码怎么做啊？
* * *
* * * * *
* * * * * * *
这个的代码怎么做啊？
pascal
program a;
var i,j,l:integer;
begin
for i:=1 to 5 do
begin
l:=i-1+i
for j:=1 to ldo
begin
write('*');
end
writeln;
end
end.
好长时间没用了，可能有语法错误
没分啊
CLEAR
S='*'
N=9
DO WHILE N>1
IF N/2<>INT(N/2)
?S
S=S+'**'
N=N-1
ELSE
N=N-1
ENDIF
ENDDO
for i=1to 7 step 2
for j=1to i
print"*";
next
print
next