Ответ:
Предположим, что требуется процедура на Pascal. Во внешнем цикле выводятся строки, во внутреннем — символы в каждой строке.
procedure Pryamougolnik(n: integer; a: char);
var i, j: integer;
begin
for i := 1 to n do
begin
for j := 1 to n do
write(a);
writeln;
end;
end;
Видимый фрагмент не показывает начало условия, поэтому восстановить остальные возможные требования нельзя.
![Фото задания: [Начало задания обрезано] Напишите процедуру с параметрами n и a, выводящую на экран n строк, каждая из которых содержит n…](https://photoai.euroki.org/img_1790757855749.jpg)