Двумерные массивы

[ksoraks]

заменить положительные элементы двумерной матрицы их целыми частями ,а отрицательные-их модулями.
Подсчитать произведение элементов 2-ой строки матрицы

[ZX Spectrum-128]

If a[i,j]>0 then
  a[i,j]:=int(a[i,j])
else 
  a[i,j]:=abs([i,j]);

[salauat]

Подсчитать произведение элементов 2-ой строки матрицы

s:=1;
 i:=2;
for j:=1 to n do
s:=s*a[i,j];

[Serge_Bliznykov]

Сообщение от salauat

Подсчитать произведение элементов 2-ой строки матрицы

всё правильно (ну, если нумерация в массиве объявлена от 1), только без переменной i здесь вполне можно обойтись!

s:=1;
for j:=1 to n do
   s:=s*a[2,j];

p.s. произведение всех элементов строки - это достаточно быстро растущая функция (сравнима, например, с ростом факториала), поэтому, если элементов в строке много и они достаточно большие, то переменную s лучше делать вещественного типа, например, doube )