Дан массив A(n,m). В каждой строке находится минимальный элемент,затем среди этих чисел выбирается максимальное. Напечатать номер строи массива A , в которой расположено выбранное число.
У смог написать как найти минимальный элемент в каждой строке, дальше не получается. Вот что у меня сделано:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
program abcd;
var
min,j,i,M,N:integer;
a: array [1..10,1..10] of integer;
begin
writeln('Введите числа M (M<=10) и N (N<=10)');
read(M); readln(N);
writeln('Введите по ',N,' элементов ');
for i:=1 to M do begin
write(i,' строки : ');
for j:=1 to N do read(a[i,j]);
end;
writeln;
writeln('Ответ');
for i:=1 to M do
begin
min:=a[i,j];
for j:=1 to n do
begin
if Min > a[i,j] then min:=a[i,j];
end;
writeln('минимальный элемент ',i,' строки : ',min);
end;
end.