Question

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

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

Answer 1

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

Answer 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把

Answer 3

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

Answer 4

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