Создать консольное приложение, которое выводит двумерный массив в виде матрицы:

Язык не указан, значит делаю на паскале:

Var a:array [1..7,1..7] of integer;

I,j:integer;

Begin

For i:= 1 to 7 do

For j:=1 to 7 do

Read(a[i,j]);

For i:= 1 to 7 do

Begin

For j:=1 to 7 do

Write(a[i,j]);

Writeln();

End;

End.