Вячейку b2 ввели формулу (b2=)а$1+с5.написать какие формулы появятся при кодировании в ячейки b4 и b2? , нужно

  поэтому в b5 нужно ввести формулу  =$a5*2+b$1*3

Const   nm = 50; {максимальная длина массива} var   i, n: integer;   a: array[1..nm] of integer; begin   write('введите количество элементов в массиве: ');   readln(n);   write('введите элементы массива через пробел ');   for i : = 1 to n do   begin       read(a[i]);   end;   i : = n;   while (a[i] < = 0) and (i > 0) do dec(i);   if i > 0 then writeln('последний положительный элемент a[', i, ']=', a[i]) end. тестовое решение: введите количество элементов в массиве: 5 введите элементы массива через пробел 3 -3 5 -5 -4 последний положительный элемент a[3]=5

Прежде всего - формулы. пусть а - длина стороны, тогда var   a, r, rr, h, s: real; begin   write('введите длину стороны треугольника: '); readln(a);   r : = sqrt(3) * a / 6;   rr : = 2 * r;   h : = 3 * r;   s : = a * h / 2;   writeln('радиус вписанной окружности ', r);   writeln('радиус описанной окружности ', rr);   writeln('высота треугольника ', h);   writeln('площадь треугольника ', s); end. тестовое решение: введите длину стороны треугольника: 10 радиус вписанной окружности 2.88675134594813 радиус описанной окружности 5.77350269189626 высота треугольника 8.66025403784439 площадь треугольника 43.3012701892219