задача на замену в массивах Опции

[Новичок]

Здравствуйте!
Помогите пожалуйста в задаче
заполнение массива произвёл не могу догадаться как оформить замену с выводом массива на печать.

Дан двухмерный массив , заменить значения всех элементов второй строки массива на число 4
for i:=1 to 2 do
for j:=1 to 2 do begin
a[i,2]:=4;
writeln(a[i,j]:6);
writeln
end;end.

[Ozzя]

 for i:=1 to 2 do
  begin
   for j:=1 to 2 do
     begin
       a[2,j]:=4;
       write(a[i,j]:6);
     end;
     writeln
  end;

с выводом массива на печать

 
Uses
  printer;
...
for i:=1 to 2 do
  begin
   for j:=1 to 2 do
     begin
       a[2,j]:=4;
       write(lst,a[i,j]:6);
     end;
     writeln(lst);
  end;

Сообщение отредактировано: Ozzя - 12.04.2010 8:26