<span><span>var mass: array [</span>1..20<span>] of </span>integer;</span>
<span>i,n:integer;</span>
<span /><span>
begin
</span>
<span /><span>writeln('Изначальный массив: ');</span><span />
<span>randomize;
</span><span><span /></span>
<span><span>for i:=</span>1 to 20 do begin</span>
<span>mass[i]:=random(30);</span><span />
<span>write(mass[i],' ');</span><span><span /></span>
<span><span>end;</span></span>
<span /><span>writeln('Новый массив: ');</span><span /><span><span /></span>
<span><span>for i:=</span>1 to 20 do begin</span>
<span /><span><span>if i<=</span>10 then</span>
<span>mass[i]:= mass[i]+4;</span>
<span>write(mass[i],' ');</span><span />
<span><span>end;</span></span>
<span><span>end.</span></span>