1. Запишите фрагмент программы, который в заданном массиве X(15) выводит на экран модули отрицательных элеменов. 2. Запишите фрагмент программы, котрый в массиве С(20) вычисляет произведение элементов, которые не делятся на 8.

3. Запишите фрагмент программы, котрый в массиве T(10) удваивает каждый элемент, который равен его индексу плз

1. Надо выделить ячейку
2. Записывать формулу начинают с знака "="
3. Выбираем ячейку с курсора, которую хотим использовать. Или записываем адрес ячейки.
4. Ставим знак арифметического действия
5. Как в пункте 3 выбираем ячейку для выполнения 

Есть ещё панель "Формулы". Там можно ставить формулу в ячейку.

1. Переходим в панель "Формулы"
2. Выбираем ячейку с курсора
3. Нажимаем либо "Вставить формулу", либо выбираем формулу для вставки рядом с предложенных

Если нажали кнопку "Вставить функцию" в появившемся окне выбираем категорию и функцию. Затем нажимаем "ОК".

Появиться окно, в котором нужно ввести число1 и число2. Эти числа будут складываться, т.к. мы выбрали функцию "СУММ ()".
Если надо выбрать ячейку нужно нажать соответствующю кнопку и с курсора выбрать ячейку. Можно выбрать как одну, так и несколько ячейк. 

//PascalABC.NET
//Дан целочисленный массив из 40 элементов. Элементы массива могут
//принимать значения от -10000 до 10000. Написать алгоритм, который
//находит и выводит среднее арифметическое всех отрицательных элементов
//массива, оканчивающихся цифрой 7. Гарантируется, что хотя бы один
//такой элемент в массиве есть. Исходные данные объявлены так, как
//показано ниже. Запрещается использовать переменные, не описанные
//ниже, но разрешается не использовать часть из них.

const
    N = 40;
var
    //a : array[1..N] of integer;
    i, s, r, x : integer;
    sr: real;
begin
    //Для любителей заполнять вручную:
    //for i := 1 to 40 do readln(a[i]);
   
    //Заполним массив 40-ка случайными значениями
    var a := ArrRandomInteger(N+1, -10000, 10000);
    //Гарантировано разместим число, оканчивающееся на 7
    a[Random(0,40)] := -10 * Random(0,999) - 7;
    //Уберем лишний элемент, созданный автоматически
    a[0] := 0;
    //Напечатаем массив
    a.println;
    writeln('----------------');
    //Просмотрим весь массив и найдя отрицательное, оканчивающееся на 7
    //число, учтём его
    foreach i in a do
        if (i < 0) and (i mod 10 = -7) then begin
            r += i; s += 1; write(i,' ')
        end;
    //Выведем среднее арифметическое
    writeln('Ср.ар: ',r/s)
end.