Двумерный массив Опции

[}0pa]

1. В паскале Как объявить двуменрный массив в виде константы, т.е. уже с заданными значениями
пример

const
X:array[1..5] of integer=(2,1,5,7,8)


В ПАСКАЛЕ
2.Даны 2 двумерных массива A(n,m) и B(k,t). Необходимо написать процедуру (внимание одну!), вычисляющую, например, сумму положительных элементов.

[volvo]

Как объявить двуменрный массив в виде константы

const
X:array[1..2, 1..5] of integer = (
  (2,1,5,7,8),
  (1,2,3,4,5)
);

Второе задание - смотри в FAQ-е и Поиске, уже решалось неоднократно...