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

номер.

Question

Информатика

Лукаха

26 июля, 05:23

Дан массив размера 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. Вывести минимальный элемент данного массива и его

номер.