Массив задается, а затем меняется:

for i := 1 to 10 do

a[i] := 2 * i + 1;

tmp := a[10];

for i := 10 downto 2 do

a[i] := a[i - 1];

a[1] := tmp;

Какое число хранится в ячейке a[1]?

Какое число хранится в ячейке a[2]?

Могу подсказать идеи: в 1м используешь метод сортировки пузырьком, только не больше или меньше, а отрицательное или положительное
во 2ом слишком просто, if(a[i]>b[i]) c[i]=a[i]; else c[i]=b[i];
в 3ем тоже дотсточно просто, пройтись циклом по массиву, и если число меньше нужного, а следующее больше, то пузырьком смещаешь все элементы выше i+1 вверх, а на i+1 вставляешь нужное число
в 4ом пройти весь массив проверяя лучше через функцию каждое число на правильность
в 5ом делаешь отдельный массив, в котором все сдавшие, и методом сложения всех чисел и деления на их количество находишь среднее.
программы пиши сам, не честно на олимпиадах так нагло воровать, дальше всё равно не пройдёшь, в 8м классе на олимпиаде по информатике из 60 человек хоть что-то решили только 4, и то по 1ой задаче

X+x+752 = 1552
x = 800/2 = 400 страниц с рисунками
y = 1152 страниц с текстом
итого символов (а значит и байт) в виде текста = 1152*640 = 737280 = 720 кб
на рисунки остается 30*1024-720 = 30000 кб
и страниц с ними 400, значит на каждый рисунок приходится по 30000 / 400 = 75кб = 76800б = 614400 бит
Для кодирования восьмицветного изображения требуются 3 бита памяти на один пиксель.
итого в рисунке 204800 пикселей. какой размер?  любой, где x*y <= 204800) квадратный корень - число нецелое.
Если квадратные - то максимальный размер 452 х 452 пикселей