Код
создать программу нахождения произведения элементов массива
Полная версия: массивы
Код
p:=1;
for i:=1 to n do
for j:=1 to m do
p:=p*x[i,j];
for i:=1 to n do
for j:=1 to m do
p:=p*x[i,j];
klem4,
он просил массива, а не матрицы
он просил массива, а не матрицы
Код
p := 1;
for i := 1 to n do p := p * x[i];
for i := 1 to n do p := p * x[i];
Ну это я ему на будущее 
) усложнил задачу в 2 раза :P
) усложнил задачу в 2 раза :P
Код
p:=1;
for i:=1 to n do
for j:=1 to m do
for z:=1 to l do
p:=p*x[i,j];
for i:=1 to n do
for j:=1 to m do
for z:=1 to l do
p:=p*x[i,j];
на более далёкое будещее. Усложгил в 3 раза
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.