Дан массив из 8 целочисленных элементов. Элементы вводятся с клавиатуры (все элементы различны). Найти минимальный элемент численного массива и его порядковый номер.
Дан массив из 8 целочисленных элементов. Элементы вводятся с клавиатуры (все элементы
различны). Найти минимальный элемент численного массива и его порядковый номер.
Гость
Ответ(ы) на вопрос:
Гостьprogram n1;
var a:array[1..8] of integer;
min,i:integer;
begin
writeln('Введите массив из 8 целочисленных элементов:');
read(a[1]);
min:=1;
for i:=2 to 8 do
begin
read(a[i]);
if a[i]
Не нашли ответ?
Похожие вопросы