Известны баллы, полученные в соревнованиях по пятиборью каждым из восьми спортсменов по каждому виду спорта. Определить: а) максимальную из оценок в таблице; б) сколько баллов набрал победитель соревнований — Pascal(Паскаль)

program try;
const
n=8;
m=5;
var
mas :array[1..n,1..m] of integer;
i,j,s,max :integer;
begin
randomize;
s:=0; max:=0;
for i:=1 to n do
for j:=1 to m do
begin
mas[i,j]:=random(100);
if mas[i,j] > max then
max:=mas[i,j];
end;
 
for j:=1 to m do
s:=s+mas[i,j];
writeln('Максимально ',max);
writeln('Всего ',s,' балл');
end.