15. Какая функция выбрана на предложенном рисунке? Для чего используют эту функцию?

СРЗНАЧ (среднее значение) - возвращает среднее арифметическое своих аргументов, которые могут быть числами, именами, массивами или ссылками на ячейки с числами.

Перевод из двоичной системы счисления в десятичную
Задание: Перевести число 11011012 в десятичную систему счисления.

Для перевода записываем данное число в общем виде:
1·2^6+1·2^5+0·2^4+1·2^3+1·2^2+0·2^1+1·2^0=
=1·64+1·32+0·16+1·8+1·4+1·0+1·1=10910

ответ: 11011012=10910

Перевод из восьмеричной системы счисления в десятичную
Задание: Перевести число 1738 в десятичную систему счисления.

Для перевода записываем данное число в общем виде:
1·8^2+7·8^1+3·8^0=1·64+7·8+3·1=12310

ответ: 1738=12310

Перевод из шестнадцатиричной системы счисления в десятичную
Задание: Перевести число 2А3С16 в десятичную систему счисления.

Для перевода записываем число в общем виде (обратим внимание на то, что букве А соответствует значение 10, а букве С - 12):
2·16^3+10·16^2+3·16^1+12·16^0=2·4096+10·256+3·16+12·1=1081210

ответ: 2А3С16=1081210

Program N70231806_1;
var a:array[ 1 .. 10 ] of shortint;
i:byte;
t:shortint;
begin
randomize;
writeln('Исходный массив: ');
for i := 1 to 10 do
begin
a[ i ] := random(21) - 10;
write(a[ i ]:4)
end;
writeln;
t := a[ 10 ];
for i := 10 downto 2 do
a[ i ] := a[ i - 1 ];
a[ 1 ] := t;
writeln('Результат: ');
for i := 1 to 10 do
write(a[ i ]:4);
readln
end.

2)
program N70231806_2;
var a:array[ 1 .. 12 ] of shortint;
i, j:byte;
t:shortint;
begin
randomize;
writeln('Исходный массив: ');
for i := 1 to 12 do
begin
a[ i ] := random(25) - 10;
write(a[ i ]:4)
end;
writeln;
for j := 1 to 4 do
begin
t := a[ 12 ];
for i := 12 downto 2 do
a[ i ] := a[ i - 1 ];
a[ 1 ] := t
end;
writeln('Результат: ');
for i := 1 to 12 do
write(a[ i ]:4);
readln
end.