Матрица: Среди столбцов целочисленной матрицы найти столбец с минимальным произведением элементов

@Асичка · Регистрация: 23.11.2012

Среди столбцов целочисленной матрицы А(n,m) найти столбец с минимальным произведением элементов.Заранее спасибо

@NurlashKO · 26.01.2013, 22:13

Pascal

var
    s, p, min, n, i, j :longint;
    a :array[1 .. 100, 1 .. 100] of longint;
begin
    readln(n);
 
    for i := 1 to n do begin
        s := 1;
        for j := 1 to n do begin
            read(a[i][j]);
            s := a[i][j] * s;
        end;
        if (s < min) or (i = 1) then begin
            min := s;
            p := i;
        end;
    end;
 
    writeln(p);
end.

@Асичка 7 / 7 / 6 Регистрация: 23.11.2012 Сообщений: 63
		1
	Матрица: Среди столбцов целочисленной матрицы найти столбец с минимальным произведением элементов 26.01.2013, 21:25. Показов 1516. Ответов 1 Метки нет (Все метки) Среди столбцов целочисленной матрицы А(n,m) найти столбец с минимальным произведением элементов.Заранее спасибо __________________ Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь 0

Опции темы

Матрица: Среди столбцов целочисленной матрицы найти столбец с минимальным произведением элементов

Решение