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

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