Имеем оценки m студентов по n предметов m = 3 n = 4. найти в массиве студента с минимальным средним .вивесты на экран средний и номер под которым он знаходиться. середний ввести с клавиатуры

Const   m = 3;   n = 4; var   a: array[1..m, 1..n] of integer;   b: array[1..m] of real;   i, j, k: integer;   min: real; begin   writeln('введите оценки студентов');   for i : = 1 to m do   begin       b[i]: =0;       for j : = 1 to n do       begin read(a[i,j]); b[i]: =b[i]+a[i,j] end;       b[i]: =b[i]/n   end;   k: =1; min: =b[1];   for i: =2 to 3 do       if min> b[i] then begin min: =b[i]; k: =i end;   writeln('студент номер ',k,' имеет минимальный cредний ',min: 5: 2) end. тестовое решение: введите оценки студентов 5 4 4 3 3 5 3 4 4 5 4 5 студент номер 2 имеет минимальный cредний   3.75