Благодаря чему компьютерная графика стало доступно широкому кругу пользователей​

Благодаря науке. Из-за развития науки работа с компьютерной графикой стала доступна почти каждому. Процессора и видеокарты даже дешевого сегмента могут обрабатывать небольшие графические сцены.

Program a1; 
var y: array[1..14] of integer; k,s1,s2: byte; minY,maxY,m: integer; 
begin 
writeln('Vvedite massiv Y: '); {просим ввести массив} 
for k:=1 to 14 do read(y[k]); {записываем массив} 
s1:=0; s2:=0; {счётчики на 0} 
minY:=y[1]; {присваиваем первому значению минимум...} 
for k:=2 to 14 do begin if y[k] < minY then degin minY:=y[k]; s1:=s1+1; end; {если есть меньше, то присваиваем} 
maxY:=y[1]; {присваиваем второму значению максимум...> <} 
for k:=2 to 14 do begin if y[k] > maxY then degin maxY:=y[k]; s2:=s2+1; end; {если есть больше, то присваиваем} 
m:=y[s1]; {используя переменную m меняем местами элементы} 
y[s1]:=y[s2]; 
y[s2]:=m; 
writeln('Novyi massiv: '); 
for k:=1 to 14 do write(y[k],' '); {выводим новый массив} 
readln 
end.

Обозначим количество попасть обратно в начальную вершину за n прыжков как A(n), а количество попасть в одну из двух других вершин как B(n) (очевидно, количество одинаково для обеих вершин). Тогда:

A(n) = 2*B(n-1) {находясь в одной из двух не-начальных вершин после n-1 прыжка, лягушка прыгает в начальную вершину}
B(n) = A(n-1) + B(n-1) {лягушка прыгает либо из начальной, либо другой не-начальной}

A(1) = 0
B(1) = 1

Далее по формулам
 A    B - n
  0    1 - 1
  2    1 - 2
  2    3 - 3
  6    5 - 4
10  11 - 5
22  21 - 6
42  43 - 7
86  85 - 8
170 9

ответ: 170