Дан одномерный массив А размерности N. Сформировать массив В, состоящий из элементов массива А умноженных на 2.

program z1;

const n = 10;

var a,b: array[1..n] of integer;

i: integer;

begin

randomize;

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

for i:=1 to n do

begin

a[i] := random(90)+10;

write(a[i]:5)

end;

writeln;

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

for i:=1 to n do

begin

b[i] := a[i]*2;

write(b[i]:5)

end

end.