Дан массив из n элементов. Найти наименьший элемент массива.

Написать в паскале абс

Question

Информатика

Людуся

20 января, 22:30

Дан массив из n элементов. Найти наименьший элемент массива.

Написать в паскале абс

+1

Ответы (1)

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

Диана · Answer 1

Program FindMin;

const n = 5;

var

min, i:integer;

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

begin

for i:=1 to n do

readln (a[i]) ;

min:=a[1];

for i:=2 to n do

if a[i]
min:=a[i];

Writeln ('Min ', min) ;

end.

Дан массив из n элементов. Найти наименьший элемент массива.Написать в паскале абс

Дан массив из n элементов. Найти наименьший элемент массива.

Написать в паскале абс