Njtype
matrix= array [1..1, 1..10] of integer;
var
a, : matrix;
i, j: integer; { индексы массива }
begin
for i :=1 to 5 do {цикл для перебора всех строк}
for j :=1 to 10 do {перебор всех элементов строки по столбцам}
readln ( a [ i , j ]); {ввод с клавиатуры элемента, стоящего в i -й строке и j -м столбце}
по итогу. i = это год. j = это численность населения.
по второму примеру. i = это ДЕНЬ, j = это вес кота