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

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

Question

Информатика

Геруха

12 июля, 13:22

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

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

+5

Ответы (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 элементов. Найти наименьший элемент массива.

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