Дан массив, элементы которого заданы датчиком случайных чисел на интервале [-20, 25]. Размер массива произвольный. Найти наименьший элемент в массиве и его порядковый номер.
Дан массив, элементы которого заданы датчиком случайных чисел на интервале [-20, 25]. Размер массива произвольный. Найти наименьший элемент в массиве и его порядковый номер.
Гость
Ответ(ы) на вопрос:
Гостьvar a:array [1..10] of integer; i,min,k:integer; begin randomize; for i:=1 to 10 do begin a[i]:=random(46)-20; write (a[i],' '); end; writeln; min:=a[1]; k:=1; for i:=2 to 10 do if a[i]
Не нашли ответ?
Похожие вопросы