ПаскальАБС.НЕТ.

[Kirill_help]

Дан массив (10х10). Найти максимальный эл-т в каждом столбце.Получить новый массив, умножив искомый эл-т на среднее арифметическое эл-ов столбца, в котором расположен этот эл-т.
Вот формула:

Y[i,j]:=cos(exp(ln(x)*0.25)-0.5*exp(ln(x)*0.5)+0.25*exp(ln(x)*0 .75));

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

[Plague]

Примерно так:

var
  n:=10;
  y := MatrRandomInteger(n, n, -50, 50);
begin
  y.Print(5);
  ArrGen(n, i -> y.Col(i).Max / y.Col(i).Average).Print;
end.