Ответы
Ответ дал:
0
Здесь, как говорится, возможна масса разных вариантов. Один из самых простых такой:
var i,j: integer;
begin
for j:=1 to 5 do begin
for i:=1 to 8 do write('* ');
writeln;
for i:=1 to 8 do write(' *');
writeln;
end;
end.
Если не подойдет - уточняйте требования к программе.
var i,j: integer;
begin
for j:=1 to 5 do begin
for i:=1 to 8 do write('* ');
writeln;
for i:=1 to 8 do write(' *');
writeln;
end;
end.
Если не подойдет - уточняйте требования к программе.
Вас заинтересует
2 года назад
2 года назад
7 лет назад
10 лет назад
10 лет назад
10 лет назад