Беседка №6

[Альтаир]

Дружелюбный некрон?

 

[Fassnacht]

Релаксирующий.

 

[SantaHrakus]

Пропустил кучу лекций по массивам. В итоге сегодня пару заседал ВК, т.к. не смог ввести двумерный массив :C Хрустик - помоги !

 

[Огюста]

Куда ты хочешь его ввести? И я надеюсь, вы уже закончили с паскалем.

 

[Xpycm]

Пропустил кучу лекций по массивам. В итоге сегодня пару заседал ВК, т.к. не смог ввести двумерный массив :C Хрустик - помоги !

arr[i,j] = 1;
В чем сложности-то?) Я с паскалем сто лет не работал, конечно, но многомерные массивы вроде везде одинаковые. Массив массивов. Только в паскале задаются как-то сложно, размерность нужно указывать, вот это все.

 

[SantaHrakus]

Пропустил кучу лекций по массивам. В итоге сегодня пару заседал ВК, т.к. не смог ввести двумерный массив :C Хрустик - помоги !

arr[i,j] = 1;
В чем сложности-то?) Я с паскалем сто лет не работал, конечно, но многомерные массивы вроде везде одинаковые. Массив массивов. Только в паскале задаются как-то сложно, размерность нужно указывать, вот это все.

Ну как объявлять двумерный массив я понял, но как его вводить - нет.

 

[Xpycm]

Обращаешься по индексу к элементу, переопределяешь.
Массив 2х2:
массив[0,0] := 1
массив[0,1] := 2
массив[1,0] := 3
массив[1,1] := 4

Проще циклом, конечно.
for i := 0 to 1 do
for j := 0 to 1 do
array[i,j] = 1;

Вроде не накосячил с синтаксисом, но не уверен.

 

[SantaHrakus]

Обращаешься по индексу к элементу, переопределяешь.
Массив 2х2:
массив[0,0] := 1
массив[0,1] := 2
массив[1,0] := 3
массив[1,1] := 4

Проще циклом, конечно.
for i := 0 to 1 do
for j := 0 to 1 do
array[i,j] = 1;

Вроде не накосячил с синтаксисом, но не уверен.

Посплю и вечером попытаюсь разобраться. О результате сообщу

 

[Альтаир]

Как меня достало, что всякие Хрякусы ползают по моим скрытым разделам.

 

[SantaHrakus]

Как меня достало, что всякие Хрякусы ползают по моим скрытым разделам.

Что ? Не вкуриваю

--- Добавлено: 13 Фев 2014 ---

program mas;
var A:array[1..3, 1..3] of integer;
i,j:integer;
begin
for i:=1 to 3 do
for j:=1 to 3 do
read(A[i,j]);
for i:=1 to 3 do
begin
for j:=1 to 3 do
write(A[i,j]);
writeln;
end;
end.


Вот как-то так получилось.