Информатика
в массиве из 12 целочисленных элементов все элементы увеличить на 2

var a:array [1..12] of integer;

i:integer;

begin

write ('Массив ');

for i:=1 to 12 do

begin

a[i]:=random(10);

write(a[i]:3)

end;

writeln;

write ('Массив ');

for i:=1 to 12 do

begin

a[i]:=a[i]+2;

write(a[i]:3)

end;

end.