Используя генератор случайных чисел, заполнить массив размерностью 10 элементов числами...

Question

Используя генератор случайных чисел, заполнить массив размерностью 10 элементов числами из интервала [-20,+20]. Вывести список элементов массива в одну строку с интервалом 4 пункта.
Помогите пожалуйста, у меня туго с инфой))

Answer 1

Var
 mas:array[1..10] of integer;
 i:integer;
begin
 randomize;
 for i:=1 to 10 do
 begin
  mas[i]:=random(41)-20;
  write(mas[i],'    ');
 end;
end.