Массив A заполнили, а потом изменили. Pascal:

n := 100;

for i := 1 to n do
A[i] := i;

for i := 1 to n div 2 do
A[i] := A[n + 1 - i];

Python:

n = 100
a = []

for i in range(0, n):
a.append(i + 1)

for i in range(0, n // 2):
a[i] = a[n - 1 - i]

Чему равна сумма первого и последнего элементов полученного в итоге массива?

n = 100

a = []

for i in range(0, n):

 a.append(i + 1)

for i in range(0, n // 2):

 a[i] = a[n - 1 - i]

print(a[0], a[len(a)-1])

Первый элемент равен 100.

Последний элемент также равен 100.

Их сумма соответственно равна 200.

Сначала надо найти аналитическое решение . определить координаты точек пересечения двух функций - это совместно решить уравнения, описывающего функции. теперь можно составить программу, предусмотрев в ней анализ случаев d< 0, d=0 и d> 0. uses crt; var   k,b,c,x1,x2,y1,y2,d: real; begin   clrscr;   write('введите через пробел c,k,b: '); read(c,k,b);   d: =sqr(k)-4*(c-b);   if d< 0 then writeln('точек пересечения нет')   else       if d=0 then begin           x1: =k/2; y1: =k*x1+b;           writeln('координаты точки пересечения (',x1: 0: 4,',',y1: 0: 4,')')       end       else begin           d: =sqrt(d);           x1: =(k-d)/2; y1: =k*x1+b;           x2: =(k+d)/2; y2: =k*x2+b;           writeln('координаты точек пересечения: ');           writeln('(',x1: 0: 4,',',y1: 0: 4,'), (',x2: 0: 4,',',y2: 0: 4,')')       end;   readkey end. тестовые решения: введите через пробел c,k,b: -2 1 1 координаты точек пересечения: (-1.3028,-0.3028), (2.3028,3.3028) введите через пробел c,k,b: 1 3 -5 точек пересечения нет введите через пробел c,k,b: 12 6 3 координаты точки пересечения (3.0000,21.0000)