Задание

Заполнение массива случайными числами в диапазоне от 10 до 160:

for i:=1 to N do

А[i] := Random(160);

for i:=1 to N do

A[i] := Random(161);

for i:=1 to N do

A[i] := Random(151)+10;

for i:=1 to N do

A[i] := Random(151)+9;