Question

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

Answer 1

Насколько я понял:
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.