Дан массив из 10 элементов. Найти сумму 2 и 9 элементов Помогите пожалуйста

//PascalABC.Net 3.2 begin var a:=ReadArrInteger('Вводите: ', readinteger('Кол-во элементов: ')); write ('Сумма: ', a[readinteger('Номер 1-го элемента: ')]+a[readinteger('Второго: ')]) end.