Информатика 9 класс.найти наименьший элемент одномерного целочисленного массива. х. у меня к/р

язык программирования какой???

Паскаль:

procedure Min;

var a:array[1..n] of integer;

min:integer;

begin

for i:=1 to n do

begin

readln(a[i]);

end;

a[1]:=min;

for i:=1 to n do

begin

if a[i]<min then min:=a[i];

end;

writeln('Минимальный элемент матрицы = ',min);

end;