Пожалуйста, помогите сделать данный двумерный массив в паскале

Пожалуйста, помогите сделать данный двумерный массив в паскале

Задать свой вопрос
1 ответ

begin

 var n := 6;

 var a := MatrGen(n, n, (i, j) -gt; (i + j) mod n + 1);

 a.Println;

end.

Клапков Кирилл
Либо так
Окуняка София
begin var n := 6; var a := new integer[n, n]; for var i := 0 to n - 1 do begin for var j := 0 to n - 1 do begin a[i, j] := (i + j) mod n + 1; write(a[i, j]:4); end; writeln; endend.
Олег Елизаветченко
PascalABC.NET
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт