Question

Помогите информатика 9 класс.Найти наименьший элемент одномерного целочисленного массива. Х.Помогите у меня К/Р

Answer 1

Ответ:

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

Паскаль:

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;