Найти произведение всех ее элементов и заменить ими элементы главной и побочной диагонали матрицы

@Barch · Регистрация: 09.04.2013

Студворк — интернет-сервис помощи студентам

Заданна матрица размером NxM состоящая из действительных элементов.Для задания исходной матрицы предусмотреть ввод с клавиатуры или с помощью датчика случайных чисел. Найти произведение всех ее элементов и заменить ими элементы главной и побочной диагонали матрицы.

Добавлено через 14 минут
нужно написать программу на языке турбо паскаль , подскажите пожалуйста.

Энтомолог · 10.04.2013, 07:30

C#

const int N=10;
const int M=10;
double[,] matrix=new double[N,M];
double p=1;
var Rnd= new Random();
 
for(int i=0;i<N;i++)
for(int j=0;j<M;j++)
{matrix[i,j]=Rnd.Next(-100,100);
p*=matrix[i,j];}
for(int i=0;i<N;i++)
{matrix[i,i]=p;matrix[i,M-i-1]=p;}

@Barch · 10.04.2013, 14:16 **[ТС]**

спасибо большое

@Barch 0 / 0 / 0 Регистрация: 09.04.2013 Сообщений: 5
		1
	Найти произведение всех ее элементов и заменить ими элементы главной и побочной диагонали матрицы 10.04.2013, 00:16. Показов 1805. Ответов 2 Метки нет (Все метки) Заданна матрица размером NxM состоящая из действительных элементов.Для задания исходной матрицы предусмотреть ввод с клавиатуры или с помощью датчика случайных чисел. Найти произведение всех ее элементов и заменить ими элементы главной и побочной диагонали матрицы. Добавлено через 14 минут нужно написать программу на языке турбо паскаль , подскажите пожалуйста. 0

@Barch 0 / 0 / 0 Регистрация: 09.04.2013 Сообщений: 5
	10.04.2013, 14:16 [ТС]	3
	спасибо большое 0

Опции темы

Найти произведение всех ее элементов и заменить ими элементы главной и побочной диагонали матрицы

Решение