Question

如何用pascal的for语句打出下面图形？

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

Answer 1

使用循环语句即可，程序如下：
var
i:integer;

begin
for i:=1 to 5 do
writeln('** **');
end.

Answer 2

program a1;
var a:integer;
begin
for a:=1 to 5 do
writeln('** **');
end.

Answer 3

var a:integer;
begin
for a:=1 to 5 do
writeln('** **');
end.

Answer 4

那么好做的