Получить действительную матрицу (Pascal)

[Gamst]

Привет. Прошу помочь

Даны действительные числа x1,x2,...,x10, y1,...,y10. Получить действительную матрицу z(i=1..10,j=1..10), для которой z[i,j]=sqr(y[j])/(2+x[i])

Здесь, как я понял, сначала задаются одномерные массивы X и Y, и по ним строить массив Z. Или не так?

[kakawkin]

Да, идет 2-а одномерных массива

x: array[1..10] of integer;
y: array[1..10] of integer;
z: array[1..10,1..10] of real;
i,j:integer;
........
{ Тут задаем значение эл-там матрицы x[] и y[] }
for i:=1 to 10 do
 for j:=1 to 10 do
  z[i,j]=sqr(y[j])/(2+x[i]);

for i:=1 to 10 do
 for j:=1 to 10 do
  begin
   write(z[i,j] :4);
   writeln;
  end;

P.S. сильно не пинай - очень давно не писал на Pascal уже =)

[ViktorR]

Да, по представленным одномерным массивам необходимо вычислить элементы двухмерного. Перед вычислением лучше проделать операцию проверки массива X[i] на предмет отсутствия элементов со значением -2.
При наличии таких элементов следует ответить, что построение матрицы невозможно.