Заполнить массив Z{30] случайными числами в интервале от 2 до 49 и вывести его на экран

var z:array[1..30]of integer;var i:integer;beginrandomize;for i:=1 to 30 do begin   Z[i]:=(random(52))-2;   writeln(Z[i]); end;end.  значения выводить можно через отдельный цикл var z:array[1..30]of integer;var i:integer;beginrandomize;for i:=1 to 30 do Z[i]:=(random(52))-2;for i:=1 to 30 do writeln(Z[i]);end.