Помогите решить пару задач в Turbo paskal)

Question

1.Найти мИНИМАЛЬНЫЙ элемент численного массива 
2.формировать одномерный массив из 8 чисел, элементы которого выбрасываются случайным образом из отрезка от - 3 до 11. Подсчитать сумму чисел > 3.

Юлия Гелева · Accepted Answer

Цена вопроса?

Nikita Milanovsky · Answer

min:=a [ 1 ]; 
for i:=2 to n do 
if a [ i ] < min then min:=a [ i ] ; 
2/ a [ i ] :=random(15) - 3; и т. д.