дан одномерный массив. найти самый минимальный элемент массива

Question

Информатика

Феодула

31 августа, 10:45

дан одномерный массив. найти самый минимальный элемент массива

+3

Ответы (1)

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

Евстахий · Answer 1

Если массив состоит из 10 элементов то код программы:

const

n=10;

var

a:array[1 ... n] of integer;

i, min:integer;

begin

for i:=1 to n do read (a[i]) ; {вводишь заданный массив}

min: = 32767;

for i:=1 to n do

If a[i]
write (min) ;

end;