У заданому фрагменті
|. кадр
||. за кадром
|||. вихід
Використано а)маркований
б) нумерований список
в) багаторівневий список​

Для того что бы округлить нужно использовать "=ОКРУГЛ" данная команда округляет число до указанного количества десятичных разрядов, цифр после запятой. (что бы округлить сумму нужно записывать количество десятичных разрядов в конце выражения). Пример:«=ОКРУГЛ(выражение);число)»

Дано:

Математическое выражение:
«(89+75)−2(72:(3+7))»

Найти:
Значение выражения и округлить его в MS Ecxel.

Формула (Её нужно ввести в окошко Excel и нажать "Enter"):
«=ОКРУГЛ((89+75)-2*(72/(3+7));2)»

ответ:
149,6

(До сотых программа округлить не может, ибо число имеет только десятые в ответе)

Далее скриншот, и файл Excel в котором формула и сам ответ.

1)
Замечание: не очень понятно какое число надо делить на 3. В программе на 3 делится первый элемент из каждой пары.
const n=12;
var a:array[1..n] of integer;
i:integer;
begin
for i:=1 to n div 2 do
 begin
 a[2*i-1]:=2*i;
 a[2*i]:=a[2*i-1] div 3;
 end;
for i:=1 to n do write(a[i],' ');
writeln;
end.

Результат:
2 0 4 1 6 2 8 2 10 3 12 4

2)
const n=12;
var b:array[1..n] of integer;
i:integer;
begin
for i:=1 to n do
 begin
 b[i]:=random(71)-10;
 write(b[i]:4);
 end;
writeln;
for i:=1 to n do
 begin
 b[i]:=b[i]-i;
 write(b[i]:4);
 end;
writeln;
end.

Пример:
17 54 4 -7 31 33 -6 27 14 59 0 43
16 52 1 -11 26 27 -13 19 5 49 -11 31