使用循环语句即可，程序如下：
var
i:integer;
begin
for i:=1 to 5 do
writeln('** **');
end.
program a1;
var a:integer;
begin
for a:=1 to 5 do
writeln('** **');
end.
var a:integer;
begin
for a:=1 to 5 do
writeln('** **');
end.
那么好做的
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024