одномерный массив из 7 элементов заполнить случайным образом числами от 5 до 35. заменить все элементы массива больше 15 врстмерками, а элементы равные 5 нулями. вывести на экран монитора первоначальный и преобразованный массивы в столбик

const n = 7;vara:array [1..n] of integer;i:integer;beginwriteln('Первоначальный массив');for i:=1 to n dobegina[i]:=5+random(31);writeln(a[i]);end;writeln('Преобразованный массив');for i:=1 to n dobeginif a[i]>15 then a[i]:=8;if a[i]= 5 then a[i]:=0;writeln(a[i]);end;end.