Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Задачи _ Матрица, Процедуры

Автор: sugutor 12.10.2006 23:44

Разработать программу предварительно выделив 1 или несколько процедур. Желательно чтобы каждая процедура являла собой алгоритм, многократно используемый в программе, т.е. вызывалась более 1 раза с разными фактическими параметрами:

В каждой из 2х матриц A(6*6) и B(8*8) определить минимальное значение среди положительных элементов главной диагонали!

помогите плз

Автор: klem4 13.10.2006 0:09

Что-то сам пробовал делать ? Такие задачи решались десятки раз

Поиск + http://forum.pascal.net.ru/index.php?showtopic=2694

Номер минимального положительного элемента матрицы размером n*n, лежащего на главной даигонали :

nmin := 0;
for i := 1 to n do
if (mx[i, i] > 0) and ((nmin = 0) or (mx[nmin, nmin] > mx[i, i])) then nmin := i;

if nmin = 0 then writeln('No')
else writeln(nmin, ' - ', mx[nmin, nmin]);

Автор: sugutor 17.10.2006 20:32

спасиб за помощь)