Дан массив размера N. Вывести минимальный элемент данного массива и его

номер.

Question

Информатика

Вереника

19 мая, 08:33

Дан массив размера N. Вывести минимальный элемент данного массива и его

номер.

+1

Ответы (1)

Знаете ответ на вопрос?

Марлена · Answer 1

Const N = 10;

Var m : array[1 ... N] of Integer;

i, k : Byte;

Begin

k:=1;

For i:=1 to N do

Begin

m[i]:=Random (100) ;

If m[i]
end;

Writeln ('Value: ', m[k],' Index: ', k) ;

end.

Дан массив размера N. Вывести минимальный элемент данного массива и егономер.

Дан массив размера N. Вывести минимальный элемент данного массива и его

номер.