//В 1С нельзя объявить переменное число
//аргументов - вместо него передают массив
Значения = Новый Массив;
Значения.Добавить(1);
Значения.Добавить(2);
Значения.Добавить(3);
Значения.Добавить(4);

Результат = Среднее(Значения);
//Результат = 2.5
Сообщить("Результат = " + Результат);

Функция Среднее(Значения)
    Если Значения.Количество() = 0 Тогда
        Возврат 0;
    КонецЕсли;

    Сумма = 0;
    Для Каждого Элемент Из Значения Цикл
        Сумма = Сумма + Элемент;
    КонецЦикла;

    Возврат Сумма / Значения.Количество();
КонецФункции