pascal中如何用for语句输出这样的图形？

** ** ** ** ** **** ** ** ** ** **

2024-12-04 14:57:26

推荐回答（4个）

回答1：

是不是：
** **
无 ** **
无无 ** **
说我听我才可以编！！

回答2：

额,这就需要用for语句循环就可以做到了~
看一下我的思路
i:=0;
readln(n);
for n:=1 to n do
begin
for i:=1 to i do
write(' ');
write('**');
i:=i+2;
end;
n表示的是行数
i表示的是空格..
我也不怎么懂,一起+U把

回答3：

只需要“** **”的：
program graph;
var n,i,j:longint;
begin
readln(n);
for i:=1 to n do begin
writeln('** **':n*2+3);
end;
end.

回答4：

简单，以下是代码：
var i:integer;
begin
for i:=1 to 3 do writeln('** **');
end.