Разберите программу заполнения массива а[1..10] следующими числами: индекс элемента: 1,2,3,4,5,6,7,8,9,10 значение элемента: 2,4,6,8,10,12,14,16,18,20 закономерность: для каждого элемента массива его значение равно удвоенному индексу

Насколько я понял:
Pascal

var
a: array [1..10] of String[3] = (2, 4, 6, 8, 10, 12, 14, 15, 16, 18, 20);
b: byte:
begin

for b:=1 to 10 do
begin
writeln(a[b]);
end;

end.