[dies]

Надо заполнить рандомно матрицу N на M и вывести минимальный элемент главной диагонали.как это сделать ни как не пойму. матрицу вывожу рандомно (randomaze ) а код чтобы вывести минимальный элемент я не знаю.Может кто решал такую задачу?

[SawA]

Код:

begin
min:=a[1,1];
for i:=1 to n do
for j:=1 to m do
if (i=j) and a[i,j]<min then
min:=a[i,j]

end;

з.ы если я не ошибаюсь и главная диагональ когда i=j

[SawA]

Кстати если тебе надо диагональ выводить то скорее всего размерность матрици будет n на n т.е квадратная иначе както диагональ не получается

[Pilot_Red]

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

Код:

begin
min:=a[1,1];
for i:=1 to n do
for j:=1 to m do
if (i=j) and a[i,j]<min then
min:=a[i,j]

end;

з.ы если я не ошибаюсь и главная диагональ когда i=j

зачем через 2 цикла если можно через один

[SawA]

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

зачем через 2 цикла если можно через один

шоб понятнее было принцип а на самом деле уж такой я человек что первое в голову пришло то и пишу

[SawA]

Ну лан вот исходник проги