Создать массив из 20 чисел случайным образом числом из промежутка от -10 дл 30 вывести элемент массива в строку через 4 позиции вот что получилось program e1; var a : array [1..20] of integer ; i: integer; begin for i : =1 to 20 do a[i]: = -10 +random(41); for i : =1 to 20 do write (a[i],''); end.