двумерный массив

[SasaTet]

написать функцию, в которую вы вводите массив 5x5, самостоятельно. и найти минимальный элемент этого массива

[type_Oleg]

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

написать функцию, в которую вы вводите массив 5x5, самостоятельно. и найти минимальный элемент этого массива

Что делается с помощью функции ?
Вводится массив, или ищется в нем минимальный элемент? Или то и другое..

[ura_111]

Да и язык какой не понятно.

[vshurig]

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

написать функцию, в которую вы вводите массив 5x5, самостоятельно. и найти минимальный элемент этого массива

Что именно не получается? Вы сами пытались делать?

[newerow1989]

var p:array[1..5,1..5] of integer;
    i,j,m:integer;
begin
   For i:=1 to 5 do
      For j:=1 to 5 do
      begin
         Write('p[',i,', ',j,'] = ');
         Readln(p[i,j]);
      end;
   Writeln;
   m:=p[1,1];
   For i:=1 to 5 do
      For j:=1 to 5 do
         If m>p[i,j] then
            m:=p[i,j];
   Writeln(m);
   Readln;
end.