Матрица

[elya88]

задача.дана матрица м*м.найти координаты максимального значения среди всех строг i элементы которых совпадают с элементами первых столбцов

[Namolem]

решение тут, пароль 50 WMR. http://file.qip.ru/file/118252290/fbba60e5/matr.html

или включаем мозг и говорим что именно непонятно

[elya88]

не могу открыть ссылку

[klsaymon]

ну тогда задаем вопросы, что именно непонятно....

[elya88]

нужно решение задачи(

[profi]

Вам НА ХАЛЯВУ никто не будет делать!!! Выкладывайте наработки или идите в раздел "Фриланс".

[Stilet]

elya88

Ну вот тебе для начала:
координаты максимального значения среди всех строг

MODULE ObxHello0;

	IMPORT StdLog,ObxRandom,Integers;

	
PROCEDURE MaxA*;
VAR a:ARRAY(5) OF ARRAY (5) OF REAL;
	mi,q,i:INTEGER; r:REAL;
BEGIN StdLog.Clear;
 FOR i:=0 TO LEN(a)-1 DO
  mi:=0;
  FOR q:=0 TO LEN(a[i])-1 DO
     a[i,q]:=50-ObxRandom.Uniform()*100; 
     StdLog.RealForm(a[i,q],5,0,0,' '); StdLog.Tab; 
     IF a[i,mi]>=a[i,q] THEN   mi:=i; END;
  END;
 StdLog.String('Максимум='); StdLog.Int(mi);StdLog.Ln;
 END;

END MaxA;

END ObxHello0.
ObxHello0.Do
ObxHello0.MaxA;

[elya88]

спасибо вам большое)))))))))))

[Stilet]

elya88

Всегда пожалуйста
Только учти что это лишь часть решения.

[elya88]

помогите пожалуйста найти корень квадратного уравнения в паскале.