Ка
Катюша
Паскаль! Массивы! Помогите!
Нужно написать программы (кроме 2 примера) 
Нужно написать программы (кроме 2 примера) 
сорь за спам
можешь не создать дублирующие вопросы задачи здесь не решают
Полностью готовый код на заказ. Бесплатно учиться за Вас не собираюсь.
могу, не дорого, если ты из России, а помогаю разобраться бесплатно, давай свой вариант программы
1. procedure rec( i: integer ); begin if (i >= n) then exit; if (i and 1 = 1) then inc( a[ i ], 5 ); else dec( a[ i ], 3 ); rec( i+1 ); end;
rec( 0 );