Завтра экзамен по Паскалю!!!

[tima16]

Ввести целочисленный массив 5х5 и определить минимальное среди элементов массива первого столбца

[Mad_Cat]

for i:=1 to 5 do
for m:=1 to 5 do
readln(a[i,m]);
m:=1;
for i:=2 to 5 do
if a[i,1]<a[m,1] then m:=i;
writeln(a[m,1]);

[denisbrain]

Сообщение от tima16

Ввести целочисленный массив 5х5 и определить минимальное среди элементов массива первого столбца

поздравляю... насчет темы